首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Public Enum s a==4 b==3 End Enum Private Sub Commandl Click() Dim x AS Integer
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Public Enum s a==4 b==3 End Enum Private Sub Commandl Click() Dim x AS Integer
admin
2012-12-21
26
问题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:
Public Enum s
a==4
b==3
End Enum
Private Sub Commandl Click()
Dim x AS Integer
X=a
If x>=3 Then MsgBox"Pass!"
End Sub
运行程序,其结果是( )。
选项
A、运行错误,因为Enum定义有错
B、运行错误,因为x=a类型不匹配
C、运行正常结束,不显示任何信息
D、运行正常,显示内容为“Pass!”的信息框
答案
D
解析
Enum是枚举类型的变量,变量定义时都是要执行的,因此x>4,必然满足4>=3,弹出信息框为pass。
转载请注明原文地址:https://kaotiyun.com/show/0Nhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行如下两条语句后,窗体上显示的是a=8596PrintFormat(a,"$00.00.00")
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:DimSWAsBooleanFunctionfunc(XAsInteger)AsIntegerIfX<20The
在窗体上画—个名称为Label1的标签,然后编写如下事件过程:PrivateSubForm_CIick()Dimarr(10,10)AsIntegerDimiAsIntege
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是
在VisualBasic工程中,可以作为“启动对象”的程序是
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsInteger,xAsIntegerFor
在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是
把窗体的KeyPreview属性设置为True,并编写如下两个事件过程:PrivateSubFor_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintKeyCode
假设A="GoodMorning.",B="Afternoon,Boys.",则下列表达式的结果等于"GoodBoys."的是()。
在窗体form1上有一个驱动器列表控件Drivel,一个目录列表控件Dirl,一个文件列表控件File1,一个富文本控件Richtexbox1。要求程序运行以后,用户可以利用。Drivel选择不同驱动器,同时Dirl中显示当前选中的驱动器的目录,用户利用D
随机试题
噻托溴铵的临床应用注意事项有
博来霉素可以和下列金属形成配合物
发生在肌肤浅表部位、范围较小的急性化脓性疾病是()
四格表χ2检验的自由度一定为
丙戊酸钠的严重毒性是
某一般框架梁(无集中荷载),混凝土强度等级为C30,截面尺寸b×h=250mm×500mm,配双肢箍φ8@100,已知受剪面满足规范要求,箍筋为HPB300钢筋,as=35mm,其斜截面承载力与下列()项数值最为接近。
某综合利用水利枢纽工程位于我国西北某省,枯水期流量很少;坝型为土石坝,黏土心墙防渗;坝址处河道较窄,岸坡平缓。工程中的某分部工程包括坝基开挖、坝基防渗及坝体填筑,该分部工程验收结论为“本分部工程划分为80个单位工程,基中合格30个,优良50个,主要
下列会计事项处理时,不必编制记账凭证的是()。
“三同时”制度,是指新建、改建、扩建项目和技术改造项目以及区域性开发建设项目的污染治理设施必须与主体工程同时设计、同时施工、同时投产的制度。根据以上定义,下列没有违反“三同时”制度的是:
Microbubbles:Anewtechniquetotreatdiseaseinvolvesthecarefulinjectionoftiny,drug-coatedbubblesinthebloodstream.A
最新回复
(
0
)