设工程文件中包名称分别为Forml、Form2的两个窗体,且Forml的菜单属性设置如下: 窗体FormI 中的程序如下: Dim Flag As Boolean Private Sub Form_Load() Fl

admin2013-11-29  32

问题 设工程文件中包名称分别为Forml、Form2的两个窗体,且Forml的菜单属性设置如下:

    窗体FormI 中的程序如下:
    Dim Flag As Boolean
    Private Sub Form_Load()
       Flag=True
       End Sub
    Private Sub nlnul_Click(index As Integer)
       If Index=1 Then
            If Flag=True Then
                Form2.show
                mnul(1).Caption=“隐藏窗体2”
            Flag=False
        Else
          Form2.Hide
          mnul(1).Caption=“显示窗体2”
            Flag=True
        End If
      End If
        If Index=2 Then End
    End Sub
    关于上述程序,以下叙述中错误的是(     )。

选项 A、Index属性的值可以用来区分控件数组元素
B、Index为l的菜单项的标题可能会改变
C、两个名称均为Mnul的菜单项构成一个控件数组
D、语句Form2.Hide将Form2卸载

答案D

解析 程序中菜单Mnul是一个控件数组,它们以Index属性值作为数组下标来区分符元素。在菜单单击事件中,Flag值为真时,显示Form2,同时把索引为l的菜单项标越改为“隐藏窗体2”,然后把Flag标志设为假;当Flag值为假时,隐藏Form2,同时把索引为l的菜单项标题改为“显示窗体2”,然后把Flag标志设为真。窗体Hide方法,只是将窗体隐藏,并没有从内容中卸载。因此D选项错。
转载请注明原文地址:https://kaotiyun.com/show/wXQp777K
0

最新回复(0)