江苏侏儒男娶165妻子:数组方法动态创建菜单的方法
来源:百度文库 编辑:中财网 时间:2024/04/30 02:27:08
建立file主菜单mnu_file
建立item子菜单mnu_item,索引0
Option Explicit
Private Sub Command1_Click()
Load mnu_item(1)
mnu_item(1).Caption = "this is sub1"
Load mnu_item(2)
mnu_item(2).Caption = "this is sub2"
Load mnu_item(3)
mnu_item(3).Caption = "this is sub3"
Load mnu_item(4)
mnu_item(4).Caption = "this is sub4"
Load mnu_item(5)
mnu_item(5).Caption = "this is sub5"
End Sub
Private Sub mnu_item_Click(Index As Integer)
Select Case Index
Case 1
Debug.Print "1"
Case 2
Debug.Print "2"
Case 3
Debug.Print "3"
Case 4
Debug.Print "4"
Case 5
Debug.Print "5"
End Select
End Sub
建立item子菜单mnu_item,索引0
Option Explicit
Private Sub Command1_Click()
Load mnu_item(1)
mnu_item(1).Caption = "this is sub1"
Load mnu_item(2)
mnu_item(2).Caption = "this is sub2"
Load mnu_item(3)
mnu_item(3).Caption = "this is sub3"
Load mnu_item(4)
mnu_item(4).Caption = "this is sub4"
Load mnu_item(5)
mnu_item(5).Caption = "this is sub5"
End Sub
Private Sub mnu_item_Click(Index As Integer)
Select Case Index
Case 1
Debug.Print "1"
Case 2
Debug.Print "2"
Case 3
Debug.Print "3"
Case 4
Debug.Print "4"
Case 5
Debug.Print "5"
End Select
End Sub
创建网站的方法
JAVA二维数组遍历的方法
有没有动态截图的方法?
制作QQ空间动态皮肤的方法
热电偶的动态标定方法举例
茎的动态生长曲线测定方法
委托是怎样动态调用方法的?
谁有创建网站的方法!
关于flash中创建按钮的方法!!
关于flash中创建按钮的方法!!
统计综合指数的创建方法及参考书
泡泡堂超级ID创建的方法
批处理文件创建方法
如何获得动态数组的个数?
动态数组是什么样子的啊
用数组方法解决约瑟夫问题
用数组方法解决约瑟夫问题。
用数组方法解决约瑟夫问题
动态统计方法是什么啊
学会动态网页制作的最快的方法是什么>
EXCEL97创建图表有哪几中方法
EXCEL97创建图表有几种方法?
制作动态电子贺卡最简便的方法
有没有什么方法可以更改自己的动态IP ?