首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

怎么用代码确认一事件是否发生

2012-03-09 
如何用代码确认一事件是否发生我需要实现以下功能:10个菜单项,点击每个菜单项下边界面都能出来一个command

如何用代码确认一事件是否发生
我需要实现以下功能:10个菜单项,点击每个菜单项下边界面都能出来一个command1按扭(是同一个),我希望在不同的菜单界面下,点击那个command1命令能显示10个不同的新窗体~~该如何实现呢?能用If语句么???

      我的意思是,比如有蔬菜、肉类、粮食等等菜单,当单击蔬菜菜单时下边界面会出来蔬菜的种类介绍什么的,然后旁边有个command命令按扭==“图片”俩字,单击后能出来许多蔬菜图片的窗体2,当点击肉类那项时,界面会出来关于肉类的介绍,然后旁边也有个command命令按扭==“图片”俩字,点进去之后能出来另一个图片窗体3。。。。我需要的就是如何实现同一个command命令在不同的菜单界面下,在被单击后能得到不同的结果,好比选择combobox中不同的项再单击旁边的command命令能出现不同的结果!!~~


如果用这个方法:在不同的菜单项的程序中添加语句,比如
Private   Sub   MnuNew1_Click()
如果此时按下command1控件,或者说command1的鼠标单击事件被触发,则
form1.show


“如果此时按下command1控件,或者说command1的鼠标单击事件被触发,则”用代码该怎么写!?

[解决办法]
定义个模块级变量,点击不同的菜单为这个变量赋不同的值,然后在按钮的click事件中根据这个值的不同执行不同的操作,如:


Private n As Long

Private Sub MnuNew1_Click()
n = 1
End Sub

Private Sub MnuNew2_Click()
n = 2
End Sub

.......


Private Sub command1_Click()
Select Case n
Case 1
'你的代码
Case 2
'你的代码
Case 3
'你的代码
.......

End Select

End Sub

[解决办法]
用楼上那种方法吧,可行

热点排行