首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Commandl的命令按钮,事件过程如下: Private Sub Commandl_Click() Dim nuln As Integer,X As Integer num=Vat(I
窗体上有1个名称为Commandl的命令按钮,事件过程如下: Private Sub Commandl_Click() Dim nuln As Integer,X As Integer num=Vat(I
admin
2013-11-29
50
问题
窗体上有1个名称为Commandl的命令按钮,事件过程如下:
Private Sub Commandl_Click()
Dim nuln As Integer,X As Integer
num=Vat(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。第2次输入90时,Select语句执行Case Else分支x=x*num=0*90=O。第3次输入60时,Select语句执行Case Is<90分支x=Bum=60。因此窗体上显示为0 0 60。
转载请注明原文地址:https://kaotiyun.com/show/pHQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库设计包括概念设计、【】和物理设计。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommandl_Click()DimI,NumRandomizeDoForI=1To1000Num=Int(Rnd*100)PrintNum;SelectCas
执行下列语句s~Input=InputBox(”请输入字符串”,”字符串对话框”,”字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是
(1)在考生文件夹下有一个工程文件sj3.vbp,窗体上有一个单选按钮数组,名称为Optionl,含4个单选按钮,它们的Index属性分别为O、1、2和3,标题依次为“Iteml”、“Itera2”、“Item3”和“Item4”,再画一个名称为Textl
(1)在名称为Forml的窗体上画一个名称为Textl的文本框,其高、宽分别为600、1800。请在属性框中设置适当的属性满足以下要求:Text1的字体为“隶书”,字号为“三号”;窗体的标题为“字体大小”,不显示最大化按钮和最小化按钮,如图4
数据库系统的核心是【】。
在代码中定义了一个子过程:SubP(a,B)...EndSub下面______调用该过程的格式是正确的。...EndSub下面______调用该过程的格式是正确的。
在软件开发中,下面任务不属于设计阶段的是
下列特征中不是面向对象方法的主要特征的是()。
设A=2,B=-4,则表达式3*A>5OrB+8>0的值是______。
随机试题
(2008)WhyMariadidn’tcometoschoolyesterday______notknown.
甲与乙离婚并达成协议:婚生男孩丙(3岁)由乙(女方)抚养,如双方中一方再婚,丙则由另一方抚养。后乙在丙6岁时再婚,甲去乙家接丙回去抚养,乙不允。甲即从幼儿园将丙接回,并电话告知乙。为此,双方发生争执,诉至法院。下列有关论述正确的有哪些?
衡量经济所生产的所有物品和劳务价格变动的指数是()。
资源税的扣缴义务人包括()。
居民个人取得的下列所得中,适用按次征收个人所得税的是()。
在Excel2003中,数据清单最多可以同时使用()个关键字进行排序。
DRAM中的存储单元是以矩阵形式组织的,通过行地址和列地址经译码后访问矩阵中的某个存储单元。一个有9根地址线、行地址与列地址复用的DRAM芯片,能访问的存储单元数目是
对C++编译器区分重载函数无任何意义的信息是()。
Howmuchdoesoneticketcost?
Supposeyouarethereinthemuseum,withthehead-sizedsmartphonepermanentlypositionedinfrontofyournose.Accordingtoa
最新回复
(
0
)