两个optionbutton控件同一个名:OptUsertype
确认按钮：CmdOk
退出按钮：CmdCancel
还有就有两个窗体，一个名A，设index属性为0。另一个B，设index属性为1。
程序如下：
Private Sub OptUsertype_Click(Index As Integer)
usertype = Index
End Sub
Private Sub CmdOk_Click()
Select Case usertype
Case 0:
Unload Me
A.Show
Case 1:
Unload Me
B.Show
End Select
End Sub
Private Sub CmdCancel_Click()
Unload Me
End Sub
运行时总是调用A窗体，不会调用B窗体，这是怎么回样？请各位“大虾”指教一下！
谢谢！

[此贴子已经被作者于2006-8-9 18:26:44编辑过]

Dim usertype As Integer

Private Sub OptUsertype_Click(Index As Integer)
usertype = Index
End Sub
Private Sub CmdOk_Click()
Select Case usertype
Case 0
A.Show
Unload Me
Case 1
B.Show
Unload Me
End Select
End Sub

Private Sub CmdCancel_Click()
Unload Me
End Sub

谢谢2楼！
原来变量是要事先声明，否则可以程序认不出是什么类型的变量！