Private Sub Command1_Click()
If Option1.Value Then
Form3 Load
Form3.Show 1
End If '这里少一个！
If Option2.Value Then
Form5 Load
Form5.Show 1
End If
If Option3.Value Then
Form6 Load
Form6.Show 1
End If
If Option4.Value Then
Form4 Load
Form4.Show 1
End If
End Sub
Select Case True
这里错了，case 后边应该是一个变量
select case x（x为一变量）
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024