Question

VB 动态菜单事件

我用Load 创建菜单动态数组
for i=0 to 10
Load aaa(i)
aaa(i).名称="按键" & i
......

产生10个动态的菜单后,点击这10个菜单中的随意一项,

我想请问如下问题
aaa单击事件通用,不管点击了1-10哪个,都触发同一事件,只需要判断出点击的是哪个项

msgbox 提示 我点击的是哪一项(比如我点了第5个动态数组,显示出的名称(按键5)和序号(5))
或者用
text1.text=我刚刚点击哪一项的名称和序号

不知道怎么去获取点击后的事件,请大神帮忙
for i=1 to 10

Answer 1

Private Sub aaa_Click(Index As Integer)
MsgBox "你点击的是第" & Index + 1 & "个菜单！菜单名为：" & aaa(Index).Caption
End Sub

附注：控件数组的事件都会自动带有一个名为Index的参数，它就是所触发的那个数组元素的序号（从0起算）。