首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Commond1_Click() Dim num As Integer,x As Integer num=Val(InputBox("请输入一个正整数")) Select
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Commond1_Click() Dim num As Integer,x As Integer num=Val(InputBox("请输入一个正整数")) Select
admin
2016-06-23
45
问题
窗体上有1个名称为Command1的命令按钮,事件过程如下:
Private Sub Commond1_Click()
Dim num As Integer,x As Integer
num=Val(InputBox("请输入一个正整数"))
Select Case num
Case Is>100
x=x+num
Case Is<90
x=Hum
Case Else
x=x*num
End Select
Print x:
End Sub
运行程序,并在三次单击命令按钮时,分别输入正整数100、90和60,则窗体上显示的内容为
选项
A、0 0 0
B、0 0 60
C、0 90 0
D、100 0 60
答案
B
解析
按钮事件中变量x为过程局部变量,第1次输入100时,Select语句执行CaseElse分支x=x*num=0*100=0。第二次输入90时,Select语句执行Case Else分支x=x*num=0*90=0。第三次输入60时Select语句执行Case Is<90分支x=num=60。因此窗体上显示为0 0 60。
转载请注明原文地址:https://kaotiyun.com/show/ovLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体模块中用Public定义的变量的作用范围是
在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程:PrivateSubTxtA_KeyPress(Keyasciiasinteger) ……EndSub若焦点位于文本框中,则能够触发KeyPress事
单击命令按钮时,下列程序的执行结果是PrivateSubCommand1_Click() BT4EndSubPrivateSubBT(xAsInteger) x=x*2+1 Ifx<6
有如下程序:PrivateSubcommand1_Click() a=1:b=1 Print"a=";a;",b=";b Callmult((a),b) Print"a=";a;";b=";b语句
下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。PrivateSubCommand1_Click()DimxAsSingle x=InputBox("
如果要将窗体中的某个命令按钮设置成无效状态,应该设置命令按钮的()属性。
inputBox函数返回值的类型为()。
随机试题
复层鳞状上皮由表层向内的排列顺序为()
A.母病及子B.相乘传变C.子病犯母D.相侮传变E.制化传变“水寒射肺”属于
提前转关方式转关与中转方式转关的期限是相同的。()
不良贷款是指()形成的贷款。
毛泽东主席的《浪淘沙·北戴河》一词“东临碣石有遗篇”,“遗篇”指的是曹操的()。
2018年5月,国务院办公厅印发《关于全面加强乡村小规模学校和乡镇寄宿制学校建设的指导意见》,提出要全面加强乡村小规模学校和乡镇寄宿制学校建设和管理,到2020年,基本补齐两类学校短板,进一步振兴乡村教育,基本实现县域内城乡义务教育一体化发展,为乡村学生提
身份行为:是指发生身份上法律效果的行为,身份行为的后果是在当事人之间发生身份关系的变动。下列行为中,不符合身份行为的是()。
戊戌维新运动的历史意义有
【26】【45】
"We’llgivethedispensersomethingtodo.Ifwegoonprescribingthese,he’lllosehiscunning."Thestudentslaughed,a
最新回复
(
0
)