如何写VB代码实现“按下按钮后弹出另一个窗口”的功能？
如上图所示。我想在按下窗体1中的绿色按钮后，直接在左边弹出另一个窗体2，并且该窗口跟窗体1是可以连在一起的，也就是说，假如我移动窗体1，窗体2也紧跟着一起移动。该如何写VB代码实现呢？
弹出窗体2后，再次按下该按钮后，窗体2隐藏或消失。这个又该怎么写呢？
form2.left=form1.left-form2.width '计算窗体2的水平位置 窗体2的左辺位置＝窗体1的左辺减掉窗体2的宽度
form2.top=form1.top '窗体2和窗体1的top一样。（显示器顶部到窗体标题栏的距离一样）
移动时同时移动就是用Timer控制吧、如果窗体2可见就运行上面同歩代码（对窗体2的left和Top进行时刻调整）Timer的Interval=100 （毎秒同歩10次、毎100Ms同歩一次）
弹出窗体2后，再次按下该按钮后，窗体2隐藏或消失。这个又该怎么写呢？
用下面的代码切换窗体2的可视属性。
if form2.visible=true then
form2.visible=false
else
form2.visible=true
endif追问
呵呵，谢谢你啦！我也想过这种方法的。因为看过VB的相关书籍，貌似没有专门对这样的情况作出过介绍的。因此就想问问有没有其他更好的方法了
追答还有一种方法、是把两个窗体做到一个里、用Panel进行显示控制（Panel当做窗体了）
wgdwdy 所言确实是一种方法，不过效率太低，需要放置若干的 Timer 控件反复计算，可能会占用大量系统资源。
题主可以参考这篇 http://www.cnblogs.com/rooly/articles/1909979.html追问
自古网络出牛人哇。。。谢谢啦！！
如何写VB代码实现“按下按钮后弹出另一个窗口”的功能?
form2.left=form1.left-form2.width '计算窗体2的水平位置 窗体2的左辺位置＝窗体1的左辺减掉窗体2的宽度 form2.top=form1.top '窗体2和窗体1的top一样。（显示器顶部到窗体标题栏的距离一样）移动时同时移动就是用Timer控制吧、如果窗体2可见就运行上面同歩代码（对窗体2的left和Top进行时...
VB怎样设置点击一个按钮后弹出另一个窗口
首先要添加两个窗体，假设第一个窗体名为Form1，第二个窗体名为Form2。在Form1窗体中添加个按钮Command1。按钮单击事件的代码为：Private Sub Command1_Click()Form2.Show\/\/用show方法加载并且显示名为Form2的窗体 End Sub show 方法后面省略了两个参数即Form2.Show 0或Form2.Show 1此参数可缺省。
...你点击了一个按扭后、会弹出一个提示框。这个怎么写啊?
(1) 如果同时提供了Helpfile与Context参数，可以按F1键来查看与Context相应的帮助主题，Excel通常会在输入框中自动添加一个帮助(Help)按钮。(2)若在消息框中显示“取消”按钮，则按下ESC键与单击“取消”按钮效果相同。若消息框中有“帮助”按钮，则提供相关的帮助信息。(3)如果要输入多个参数并省略中...
请问怎么用VB实现点击一个按钮弹出一个对话框
Private Sub Command1_Click()MsgBox "因为你长的不够帅，所以执行了非法操作， " + Chr(13) + " " + Chr(13) + "此程序即将关闭，" + Chr(10) + " " + Chr(13) + "如果有问题，请与供应商联系。", 19, "系统信息"End Sub ...
VB怎样设置点击一个按钮后弹出另一个窗口
要新建一个窗口 form2在那个按钮上双击，然后输入Private Sub command1_click1()form2.Show End Sub就可以了
VB单击按钮打开新窗口代码
private sub command1_click()form2.show 1,me '第一个参数如果是1，那么载入新窗口后，原窗口就不能动，调用新窗口的程序就停在调用处，待新窗口hide或unload等才继续往下运行。end su
VB中,如何点击一个按钮后,弹出一个网页?
首先要添加两个窗体，假设第一个窗体名为form1，第二个窗体名为form2。在form1窗体中添加个按钮command1。按钮单击事件的代码为：private sub command1_click()form2.show '用show方法加载并且显示名为form2的窗体 end sub show 方法后面省略了两个参数即form2.show 0或form2.show 1此参数可缺省。
VB菜单栏,想点了菜单栏的某个按钮,然后转到另一个form,求代码
假设form1上有个按钮Command1，按下按钮后，form1消失，form2显示，代码如下：Private Sub Command1_Click()unload form1 '卸载form1 load form2 '加载form2（注意这里只加载了，还没能显示出来，需要下一个语句来显示）form2.show '显示form2 End Sub 如果只是希望点击按钮后，原来的form1仍...
VB中如何实现关闭窗口的同时 显示另外一个窗口?
f1里面 按钮点击时候 dim f2 as new f2 f1.vislibe=false f2.show f2里面 Protected Overrides Sub Finalize()f1.vislibe=ture MyBase.Finalize()End Sub
我要用vb点击一个按钮,然后弹出一个窗口怎么操作??
1.创建你想弹出的窗口（体），内容自定义。2.定义“按钮”的Click()事件。示例：Sub Command1_Click()Form1.Hide Form2.Show End Sub 其中Form1为按钮所在的窗口（体），Form2是你想要弹出的窗口 3.如有疑问，留言QQ475598096，一起研究。
