VB菜单栏,想点了菜单栏的某个按钮,然后转到另一个form,求代码
比如说:本页面是form1,转到form2还有form可不可以用其它做过的form,怎么加载进去...
比如说:本页面是form1,转到form2
还有form可不可以用其它做过的form,怎么加载进去 展开
还有form可不可以用其它做过的form,怎么加载进去 展开
3个回答
展开全部
假设form1上有个按钮Command1,按下按钮后,form1消失,form2显示,代码如下:
Private Sub Command1_Click()
unload form1 '卸载form1
load form2 '加载form2(注意这里只加载了,还没能显示出来,需要下一个语句来显示)
form2.show '显示form2
End Sub
如果只是希望点击按钮后,原来的form1仍在,将form2显示出来,并且获得焦点,代码如下:
Private Sub Command1_Click()
load form2 '加载form2(注意这里只加载了,还没能显示出来,需要下一个语句来显示)
form2.show '显示form2
form2.Setfocus 'form2获得焦点,会显示在屏幕的最前面
End Sub
Private Sub Command1_Click()
unload form1 '卸载form1
load form2 '加载form2(注意这里只加载了,还没能显示出来,需要下一个语句来显示)
form2.show '显示form2
End Sub
如果只是希望点击按钮后,原来的form1仍在,将form2显示出来,并且获得焦点,代码如下:
Private Sub Command1_Click()
load form2 '加载form2(注意这里只加载了,还没能显示出来,需要下一个语句来显示)
form2.show '显示form2
form2.Setfocus 'form2获得焦点,会显示在屏幕的最前面
End Sub
展开全部
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Index
Case 1
M_zonghe_Click‘这是菜单事件的名字
Case 2
M_jifen_Click‘这是菜单事件的名字
End Select
End Sub
Private Sub M_zonghe_Click()’菜单点击的时候显示窗体
Form2.Show
End Sub
Private Sub M_jifen_Click()’菜单点击的时候显示窗体
Form3.Show
End Sub
Select Case Button.Index
Case 1
M_zonghe_Click‘这是菜单事件的名字
Case 2
M_jifen_Click‘这是菜单事件的名字
End Select
End Sub
Private Sub M_zonghe_Click()’菜单点击的时候显示窗体
Form2.Show
End Sub
Private Sub M_jifen_Click()’菜单点击的时候显示窗体
Form3.Show
End Sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
假设您是在form1里面点击command1然后就跳到form2那么代码就是。在command1里面写入form2.show。有什么问题可以追问我,如果没有请给我满意答案,谢谢。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询