VB窗体中内容影响另一个窗体

来源：百度知道 编辑：UC知道 时间：2024/06/30 10:53:14
FORM1中设三个命令按钮，红色、绿色、紫色。FORM2中单选按钮与复选框若干，如红旗（复选框）、红椒（复选框）；西瓜（复选框）、黄瓜（复选框）；茄子（单选钮）
求：当单击FORM1中红色命令按钮，FORM2中出现红旗和红椒为可选，其余几项呈灰色；当单击绿色按钮时，出现西瓜和黄瓜为可选，其余几项呈灰色；当单击紫色按钮时，出现茄子为可选，其余为灰色。

只要在控件名称前面加上窗体名称就可以了。
比如
form2.hongjiao.enabled = true

示例：
'设红色按钮为cmdred以此类推
private sub cmdred_click()
for each control in form2.controls
Control.Enabled = False
Next
form2.redjiao.enabled=true
form2.redflag.enable=true
end sub
'其他的以此类推

Private Sub Command1_Click()
Form2.Check1.Enabled = True
Form2.Check2.Enabled = True
Form2.Check3.Enabled = False
Form2.Check4.Enabled = False
Form2.Option1.Enabled = False
End Sub

Private Sub Command2_Click()
Form2.Check3.Enabled = True
Form2.Check4.Enabled = True
Form2.Check1.Enabled = False
Form2.Check2.Enabled = False
Form2.Option1.Enabled = False
End Sub

Private Sub Command3_Click()
Form2.Check1.Enabled = False
Form2.Check2.Enabled = False
Form2.Check3.Enabled = False
Form2.Check4.Enabled = False
Form2.Option1.Enabled = True
End Sub

Priva