首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程文件中包名称分别为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
admin
2020-02-27
25
问题
设工程文件中包名称分别为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://jikaoti.com/ti/Vax0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序段的功能是()。x=8.6y=Int(x+0.5)Printy
文本框接受的最长字符数由文本框的()属性确定。
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1_Click()Dimao/0,b%,i%s=1:a=2Fori=2
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:PrivateSubCommand1_Click()Counter=0Fori=1To4Forj=6To1Step-2Counter=Co
现有如下程序:PrivateSubCommand1_Click()s=0Fori=1To5S=s+f(5+i)NextPrintsEndSubPublicFunctionf(xAsInteger)Ifx>=10Thent
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是()。
以下叙述中错误的是()。
有下面事件过程:PrivateSubCommand1_Click()a=5b=8Fork=1To30c=b-aa=bb=cNextkPrintcEndSub上面事件过程执行后产生的输出是()。
在一棵二叉树上,第5层的结点数最多是()。
随机试题
公路建设管理法规体系是梯形,分为()。
A.吡斯的明B.琥珀胆碱C.阿曲库铵D.六甲双铵E.哌仑西平
细菌的繁殖方式是()
8岁男孩,左髋部痛,跛行,伴低热、盗汗、食欲不振3周。查体:体温37.6℃,左髋部活动受限,Thomas征阳性。髋关节X线片见关节间隙略窄,边缘性骨破坏。其诊断首先应考虑为
苯骈二氮杂蕈类药物中特殊杂质为
纤维蛋白性心包炎的主要症状是
依据《生产经营单位安全培训规定》的规定,厂(矿)级岗前安全培训内容不包括()。
以批处理方式和交互方式控制作业运行都需要注册。()
在强大的习惯面前,科学有时也会变得__________________。填入划横线部分最恰当的一项是()。
Forthispart,youareallowed30minutestowriteashortessay.Youshouldstartyouressaywithabriefdescriptionofthepi
最新回复
(
0
)