测试了一下,应该是click事件的bug,你写到CheckedChanged事件,如代码
If e.sender.Checked Then e.Form.Controls("Panel1").Visible = False e.Form.Controls("Panel2").Visible = True e.Form.Controls("Panel3").Visible = False e.Form.Controls("com1").Enabled = False e.Form.Controls("com3").Enabled = FalseEnd If