VB神童教程第四章第三节——动态增减菜单

基于上一节中的例子，我们制作一个如图1所示的小程序。每次我们点击“添加信息”命令，一个“信息”菜单就会自动添加到菜单中。每次我们单击“清除菜单”命令，程序都会自动清除当前的信息菜单。当菜单恢复原样，即只剩下“信息”菜单时，“清除菜单”无效。

一、接口设置:

根据第2部分的最终结果，创建如图1所示的界面。需要注意的是，数字0必须填写在“MenuHint”前面的“index”框中。

在程序中，只要在“索引”文本中输入一个数字，就意味着菜单变成了一个“菜单数组”，通过它可以动态地添加和清除菜单。

二、程序代码:

1.为“信息菜单”指定变量:

对于添加或清除菜单命令，我们可以这样看:原来的“信息菜单”是MenuHint(0)，也是索引值为0的意思；那么一个添加的信息菜单应该是MenuHint(1)，另一个应该是MenuHint(2)，以此类推；清除信息菜单与此类似。如果当前是MenuHint(X)，清除一个后应该是MenuHint(X-1)，以此类推。

指定的索引值是HintNumber，所以增加的时候应该是hint number = hint number+1；清除，应该是HintNumber = HintNumber -1。

2.变量的范围:

变量的范围有多大？这取决于变量的类型。当变量只在某个流程或事件中起作用时(比如按钮的点击事件)，它就是局部变量，可以直接在事件中定义；当一个变量可以在整个表单中使用时，它可能是表单级变量，也可能是全局变量。这个表单上的所有事件都可以引用这个变量，这个变量只能在“通用”流程中“声明”。