首页 理论教育 VisualBasic程序设计:设计菜单项增减

VisualBasic程序设计:设计菜单项增减

时间:2023-10-20 理论教育 版权反馈
【摘要】:建立好菜单后,菜单项是不能自动增减的,菜单项的增加或者减少可通过控件数组来实现。表7-1菜单项的设置代码设计在菜单编辑器窗体中单击“退出”菜单,然后输入如下代码。“字体名称”菜单下的Click事件代码如下。在VB中可以利用“复选菜项单名.Checked=True”或“复选菜单项名.Checked=False”对复选菜单进行判断,当值为True,复选菜单项被选中;当值为False,复选菜单项未被选中。

VisualBasic程序设计:设计菜单项增减

建立好菜单后,菜单项是不能自动增减的,菜单项的增加或者减少可通过控件数组来实现。一个控件数组包含若干个控件,这些控件的名称相同,所使用的事件过程相同,但其中的每个元素具有自己的属性。控件数组和普通数组一样,通过下标(索引)访问数组中的元素。控件数组可在设计阶段创建,也可以在运行阶段创建。

【案例7-1】设计一个“字体”设置菜单。

【案例要求】

在“字体”菜单项下,设置窗体文本框中的字体名称和字体风格,单击主菜单“退出”项则退出程序,菜单效果图如图7-3所示。

图7-3 菜单运行效果

图7-4 菜单设计效果

【案例操作】

(1)界面设计

使用菜单编辑器,根据表7-1和图7-4制作一个如图7-3所示的菜单。

表7-1 菜单项的设置(www.xing528.com)

(2)代码设计

在菜单编辑器窗体中单击“退出”菜单,然后输入如下代码。

“字体名称”菜单下的Click事件代码如下。

在VB中可以利用“复选菜项单名.Checked=True”或“复选菜单项名.Checked=False”对复选菜单进行判断,当值为True,复选菜单项被选中;当值为False,复选菜单项未被选中。“字体风格”菜单下的Click事件代码如下。

(3)运行程序

按F5键或点击工具栏中的“运行”按钮运行程序,点击“字体/字体名称/黑体Ctrl+H”,执行效果如图7-3所示。

免责声明:以上内容源自网络,版权归原作者所有,如有侵犯您的原创版权请告知,我们将尽快删除相关内容。

我要反馈