VB optionbutton的一个功能实现问题

来源：百度知道 编辑：UC知道 时间：2024/06/21 23:10:38
我做了两个optionbutton1和2,隐藏frame1和frame2,点第一个option使frame1出现,但是fame2不显示.点第二个使frame2出现,frame1消失.
希望可以给我满足要求的代码,我放在Form_Load里不行..

1.需设置默认状态,即程序运行时按钮的状态及Frame1,frame2的显示状态.否则刚运行时可能会与所需要的效果背道而驰.
Private sub Form_load()
OptionButton1.value=true
Frame1.visible=true
Frame2.visible=false
end
2.单击选项按钮时发生的事件.
Private sub Optionbutton1_click()
Frame1.visible=true
Frame2.visible=false
end

Private sub Optionbutton1_click()
Frame1.visible=false
Frame2.visible=true
end

放够足够的控件option1、option2、option3，frame1、frame2，注意，先放option控件,再放frame控件,不要把任何一个option控件放在frame控件里面！切记。下面是全部代码：
Private Sub Form_Load()
Frame1.Visible = False
Frame2.Visible = False
Option1.Value = False
Option2.Value = False
Option3.Value = True
Option3.Left = Form1.Width + 10000
End Sub
Private Sub Option1_Click()
Option2.Value = False
Frame1.Visible = True
Frame2.Visible = False
End Sub
Private Sub Option2_Click()
Option1.Value = False
Frame1.Visible = Fals