首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程文件中包名称分别为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-06-30
46
问题
设工程文件中包名称分别为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/IBHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了调整图像框的大小以与其中的图形相适应,必须把它的Stretch属性设置为( )。
数据流图由一些特定的图符构成。下列图符名标以的图符不属于数据流图合法图符的是()。
以下关于VB特点的叙述中,错误的是
假定窗体上有一个标签,名为Label。为了使该标签透明并且没有边框,则正确的属性设置为()。
下列叙述中正确的是()。
将窗体的KeyPreview属性设为True,然后编写如下程序:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)
在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为"宋体"和"黑体";1个复选框(名称为Check1,标题为"粗体")和1个文本框(名称为Text1,Text属性为"改变文字字体"),窗体外观如图所示。程序运行后,要求"宋体"单选
下列选项中不属于软件生命周期开发阶段任务的是()。
为了清除列表框中指定的项目,应使用的方法是()。
以下关于图片框控件的说法中,错误的是( )。
随机试题
钢结构所用防火涂料应经有资质的检测单位检测。()
当施工项目的实际进度比计划进度提前,但业主不要求提前工期时,适宜采用的进度计划调整方法是()。
影响人员安全疏散的因素中,人员内在影响因素主要包括()。
结合某具体游戏谈一下游戏准备活动的指导。
首创“心理测验”这一术语的学者是
甲对乙实施抢劫,乙奋起抗争,恰遇甲之友丙经过,甲请丙帮忙,共同抢得乙身上钱财若干。甲、丙的共同犯罪属于()。
运用市场法时选择三个或三个以上的参照物的目的是()。
Anintelligentpersonwillnotallowhimselftobeinfluencedbyadvertisements.Instead,hewill,firstofall,trytogettok
EversinceAesop,fantasyhasplayedanimportantroleinchildren’sliterature.Threenewbookscontinuethetraditionofencha
He______forherforonehourbythetimeshearrivedthere.
最新回复
(
0
)