xcode8真机调试步骤:VB 按钮的跳转属性(请会VB的朋友进来看看)

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/03 02:53:05
要实现的效果:在Form1上放一个按钮,再新建另一个窗体FORM2,在程序运行时,使用FORM1上的按钮跳转到FORM2,请问怎么做?

Form2.show()
unload me

private sub commond1_click()
form2.show
form1.hid
end sub

Dim form2 As Form
Private Sub Command1_Click()
If Me.Caption <> "Form1" Then Exit Sub
Set form2 = New Form1
Load form2
form2.Caption = "这是一个由Form1生成的窗体"
form2.Show
End Sub

Private Sub Command1_Click()
form2.show
end sub