[单项选择题] 设工程文件中包名称分别为Form1、Form2的两个窗体，且Form1的菜单属性设置如下： 标题(p) 名称(m) 内缩符号 Index

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

Fo

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选项错。