如何用代码确认一事件是否发生
我需要实现以下功能: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
[解决办法]
用楼上那种方法吧,可行