首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有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
2018-12-20
53
问题
窗体上有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://kaotiyun.com/show/NyFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下Command1的单击事件过程及fun过程:PrivateSubCommand1_Click() DimxAsInteger x=Val(InputBox("请输入一个整数")) fun(x)EndSubPrivate
为了对多个控件执行操作,必须选中这些控件。下列不能选中多个控件的操作是( )。
窗体上有一个名称为Option1的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程:PrivateSubOption1_Click(IndexAsInteger) …EndSub下面关于此过程的参数Index的叙
在窗体上画1个命令按钮和1个文本框,其名称分别为Command1和Text1,再编写如下程序:DimssAsStringPrivateSubText1_KeyPress(KeyAsciiAsInteger) IfChr(KeyAsc
以下关于函数过程的叙述中,正确的是( )。
在关系数据库中,用来表示实体间联系的是
在设计阶段,假定在图片框Picture1中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
设窗体上有一个名称为Timer1的计时器控件,其Interval属性被设置为500,Enabled属性被设置为True;还有一个名称为Text1的文本框和下面的事件过程:PrivateSubTimer1_Timer()Sta
下面描述中不属于数据库系统特点的是
随机试题
有关药敏操作正确的是
某男,30岁,高热后大便秘结,兼见口渴咽干、口唇干裂,舌红少津,宜选用的成药是()。
某机电专业承包公司通过招投标中标一座氨制冷站机电安装工程。双方签订了工程承包合同,合同规定,整个制冷站负荷试运转达到设计要求后一起交给业主。工程进入单机试运转阶段后,项目部专业工程师编制了试运转方案,经项目部总工程师审核、项目经理批准后执行,同时呈报总监理
在刑事诉讼法庭审判过程中,遇有下列情形,人民法院可以决定中止审理的有()。
中央银行在经济衰退时,()法定存款准备金率。
某学生考试失败后,家长骂道:我看你就不是读书的料,从归因层面来说这实际是将失败归因于()。
否定之否定的规律揭示了事物发展变化的基本形式和状态。()
1860年,英法联军占领北京,火烧圆明园,然后强迫清政府签订了中英、中法()。
阅读下列史料并回答问题:政治局扩大会相信,中国苏维埃革命有着他雄厚的历史的泉源,他是不能消灭的,他是不能战胜的。中央苏区、湘鄂赣苏区、湘赣苏区与闽浙赣苏区的变为游击区,不过是整个苏维埃革命运动中部分的挫折。这种挫折丝毫也不足以使我们对于中国苏维埃
Today’spolicemeninlargecitiesthroughouttheworld【C1】______onmodeminventionstohelpthemintheirwork.Inmostplacesm
最新回复
(
0
)