2. 计算机
  3. 设工程文件中包名称分别为Form1、Form2的两个窗体，且Form1的菜单属性设置如下： 窗体Form1中的程序如下： Dim Flag As Boolean Private Sub Form_Load() 　　Flag＝True End Sub Pr

设工程文件中包名称分别为Form1、Form2的两个窗体，且Form1的菜单属性设置如下： 窗体Form1中的程序如下： Dim Flag As Boolean Private Sub Form_Load() 　　Flag＝True End Sub Pr

admin2019-03-14  64
问题 设工程文件中包名称分别为Form1、Form2的两个窗体，且Form1的菜单属性设置如下：

窗体Form1中的程序如下：
Dim Flag As Boolean
Private Sub Form_Load()
　　Flag＝True
End Sub
Private Sub mnu1_Click(index As Integer)
　　If Index＝1 Then
　　　　If Flag＝True Then
　　　　　　Form2.show
　　　　　　mnu1(1).Caption＝"隐藏窗体2"
　　　　　　Flag＝False
　　　　Else
　　　　　　Form2.Hide
　　　　　　mnu1(1).Caption＝"显示窗体2"
　　　　　　Flag＝True
　　　　End If
　　End If
　　If Index＝2 Then End
End Sub
关于上述程序，以下叙述中错误的是(　　)。
选项 A、Index属性的值可以用来区分控件数组元素
B、Index为1的菜单项的标题可能会改变
C、两个名称均为Mnu1的菜单项构成一个控件数组
D、语句Form2.Hide将Form2卸载
答案D
解析 程序中菜单Mnu1是一个控件数组，它们以Index属性值作为数组下标来区分各元素。在菜单单击事件中，Flag值为真时，显示Form2，同时把索引为1的菜单项标题改为"隐藏窗体2"，然后把Flag标志设为假；当Flag值为假时，隐藏Form2，同时把索引为1的菜单项标题改为"显示窗体2"，然后把Flag标志设为真。窗体Hide方法，只是将窗体隐藏，并没有从内容中卸载。因此D选项错。
转载请注明原文地址:https://kaotiyun.com/show/P6Up777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)