Question

vb 对话框 窗体在form1里按下command1后弹出msgbox确定对话框，确定后返回form1

vb 对话框 窗体在form1里按下command1后弹出msgbox确定对话框，确定后返回form1，再次按下command1后则弹出form2要怎么实现 啊，我弄的总是msgbox跟form2一起弹出，求大侠讲的详细具体点啊，本人菜菜鸟

Answer 1

Option Explicit
Dim BoL_butClick As Boolean
Private Sub Command1_Click()
Select Case BoL_butClick
Case False
MsgBox ""
Command1.Caption = "点击打开窗口2"
Case True
Load Form2
Form2.Show 1
Command1.Caption = "点击弹出对话框"
End Select
BoL_butClick = Not BoL_butClick

End Sub

Private Sub Form_Load()
Command1.Caption = "点击弹出对话框"
End Sub

Answer 2

多用一个变量
dim i
i=0
sub command1_Click.....
if i=0 then
msgbox ....
i=i+1
else
form2.show
end if
....