问题
单项选择题
设工程文件中包名称分别为Form1、Form2的两个窗体，且Form1的菜单属性设置如下：
| 标题(p) | 名称(m) | 内缩符号 | Index |
| 窗体 | Mnu() | 无 | |
| 显示窗体2 | Mnu1 | 1 | 1 |
| 退出 | Mnu1 | 1 | 2 |
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选项错。