private sub command1_click()form2.show 1,me '第一个参数如果是1，那么载入新窗口后，原窗口就不能动，调用新窗口的程序就停在调用处，待新窗口hide或unload等才继续往下运行。end su
VB单击按钮打开新窗口代码
方法: 1>.可以用MDI来实现
2>.在VB6.0里添加两个窗体 form1,form2
'代码如下
'form1中添加的代码
———————————————————————————————————
Private Sub Command1_Click()
Form2.Show
End Sub
Private Sub Form_Load()
Form1.Caption = "多窗口程序"
Command1.Caption = "点我打开新窗口"
End Sub
———————————————————————————————————
’form2中添加的代码
———————————————————————————————————
Private Sub Form_Load()
Form2.Caption = "这是新打开的窗口"
End Sub
———————————————————————————————————
xp下测试通过！2009-07-08
private sub command1_click()
form2.show 1,me '第一个参数如果是1，那么载入新窗口后，原窗口就不能动，调用新窗口的程序就停在调用处，待新窗口hide或unload等才继续往下运行。
end su2009-07-07
private sub command1_click()
dim f as new form2
f.show
end sub2009-07-07
..........
建2个窗体，在第一个窗体的代码里面写 form1.Show:form2.Hide
Hide是隐藏的方法
Show是显示的方法
可以直接复制
：是2行代码写在一行里的2009-07-07
