首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer Static s As Integer x=Val(Inpu
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer Static s As Integer x=Val(Inpu
admin
2019-03-14
56
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim x As Integer
Static s As Integer
x=Val(InputBox("请输入一个正整数"))
If x<5 Then
s=s*x
Else
s=s+x
End If
Print s
End Sub
运行程序,三次单击命令按钮,依次输入5、4、3,最后一次输出的结果是( )。
选项
A、60
B、120
C、20
D、5
答案
A
解析
本题中,首先使用static关键字,定义了一个静态局部变量s,初始值为0。然后通过InputB0x接收键盘输入一个值,使用Val转换函数将接收的字符型数据转换成数值型数据,赋值给x,接下来使用If~Else语句,判断条件“x<5”是否成立,若成立则执行语句“s=s+x”,否则执行语句“s=s+x”;使用statie定义的局部变量可以保留上次程序执行的结果。运行程序,三次单击命令按钮,依次输入5、4、3,各变量的值如下表所示。
所以A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/FdFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下Command1的单击事件过程及fun过程:PrivateSubCommand1_Click() DimxAsInteger x=Val(InputBox("请输入一个整数")) fun(x)EndSubPrivate
下列叙述中正确的是( )。
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger m=1:n=0 DoWhilem
如下数据定义语句:DimX,YAsInteger以上语句表明( )。
运行程序后单击命令按钮。以下叙述中错误的是( )。
设:a=3,b=5,c=4,d=7,表达式ad)OrNot(b
函数表达式Sgn(-10)的值是
下面叙述中错误的是
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是
(1)在考生文件夹中有工程文件sjt3.vbp,其中的窗体如图4所示。程序刚运行时,会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮,再单击“查找"按钮,则找出数组中的最大值(或最小值),并显示在标签Label2中。请去掉
随机试题
《日出》中美丽、聪慧的交际花是()
诊断阵发性室上性心动过速最有意义的是
前列腺癌内分泌治疗,注射LHRHa之前需口服雄激素受体拮抗剂的作用是
隐匿性肾炎患者的治疗原则是
适用于软X线摄影的部位是
99%存在于骨骼和牙齿中,其余的1%存在于血液和细胞外液中的无机盐是()。
为了加强海事文化建设。单位要做一个海事文化专刊,由你负责编辑发行。一位老同事投了一篇非常好的有关海事业务的专业性文章,但是与本次的文化主题不符,没有被采用,老同志很不高兴,你如何与他沟通?请现场模拟。
海上发生了两船相碰事件,海事部门已经就此次事故做了责任划分,但是有一方对结果表示不满,认为自己不应该承担责任。于是纠集了一群船员及家属到海事局办事大厅闹,声称不给解决就跳海。你怎么解决?
Whatisthespeakerdoing?
"Family"isofcourseanelasticword.ButwhenBritishpeoplesaythattheirsocietyisbasedonfamilylife,theyarethinking
最新回复
(
0
)