首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click() Dim num As Integer, x As Integer num=Val(InputBox("请输入一个正整数"))
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click() Dim num As Integer, x As Integer num=Val(InputBox("请输入一个正整数"))
admin
2015-08-28
19
问题
窗体上有1个名称为Command1的命令按钮,事件过程如下:
Private Sub Command1_Click()
Dim num As Integer, x As Integer
num=Val(InputBox("请输入一个正整数"))
Select Case num
Case Is>100
x=x+num
Case Is<90
x=num
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语句执行Case Else分支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://jikaoti.com/ti/zbJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当用户按下键盘上的某个键时,将会触发拥有输入焦点的控件的______事件。
在窗体上画一个名称为Text1的文本框,并编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSub
下列关于栈的叙述中正确的是______。
数据库的物理设计是为一个给定的逻辑结构选取一个适合应用环境的______的过程,包括确定数据库在物理设备上的存储结构和存取方法。
在窗体上画4个文本框(如图16-8所示),并用这4个文本框建立一个控件数组,名称为Text1(下标从0开始,自左至右顺序增大),然后编写如下事件过程:PrivateSubCommand1_Click()ForEachT
如果要改变窗体的标题,需要设置窗体对象的______属性。
在数据管理技术发展过程中,文件系统与数据库系统的主要区别是数据库系统具有______。
在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是______。
下列数据模型中,具有坚实理论基础的是______。
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果,例如:若str=”ABCDABCD”,ch=”B”,则函数的返回值为:”ACDACD”Functiondelchar(strAsString,chAsSt
随机试题
肺炎中最常见的病原体是
良性肿瘤与恶性肿瘤的根本区别在于肿瘤的
男性,63岁,腹胀、腹痛半天,恶心、无呕吐,既往有慢性便秘,多次腹痛经排便后缓解病史,查体:T37.5℃,P88次/分,R22次/分,BPl40/90mmHg,腹部膨隆不对称,左上腹叩鼓音。X平片示左上腹可见马蹄形巨大双腔充气肠袢。最可能的诊断是
A.其生产、包装和储存应使用专用的、安全的设备B.必须使用独立的厂房与设施,分装室应保持相对负压C.其生产区应保持相对负压,并有独立的空气净化系统D.其加工或罐装不得同时在同一生产厂房内进行,其储存要严格分开E.必须使用专用设备和独立的空气
关于个人综合消费贷款,以个人商用房抵押的.贷款金额最高不超过抵押物价值的()。
甲公司是一家生产空调的民营企业。公司创办人经过分析后,决定进军汽车制造业。在决定是否选择该战略时,甲公司可以考虑的战略选择方法有()。
根据有关规定,下列建设工程施工合同中不可以认定为无效合同的是()。
ARMCortex—A是ARMCortex应用处理器,此系列中A5、A7、A8、A9、A12、A15和A17字长【49】位,而A50系列中的A53和A57字长为【50】位。
—Wouldyouliketoseeafilmwithusthisevening?—Iwouldliketo.ButIcan’t______thetimebecauseIhavetofinishmycom
•LookatthestatementsbelowanddescriptionofsomeoftheEurope’sfastgrowingcompaniesontheoppositepage.•Whichcompan
最新回复
(
0
)