首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer Static s As Integer x=Val(InputBox("请输入一个正整数="
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer Static s As Integer x=Val(InputBox("请输入一个正整数="
admin
2016-06-22
29
问题
在窗体上画一个名称为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
解析
本题中,首先使用Statie关键字,定义了一个静态局部变量s,初始值为0。然后通过InputBox接收键盘输入一个值,使用Val转换函数将接收的字符型数据转换成数值型数据,赋值给x,接下来使用If~Else语句,判断条件“x<5”是否成立,若成立则执行语句“s=s*x”,否则执行语句“s=s+x”;使用Static定义的局部变量可以保留上次程序执行的结果。运行程序,三次单击命令按钮,依次输入5、4、3,各变量的值如下表所示。
所以A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/00Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下说法中正确的是
假定有如下事件过程:PrivateSubForm_MouseDown(BuaonAsInteger,ShiftAsInteger,xAsSingle,y_AsSingle) IfButton=2Then
下面程序段,运行后的结果是PrivateSubCommand1_Click()Dimb%(1To4),i%,t# Fori=1To4 b(i)=i Next t=Tof(b()
下列选项中不符合良好程序设计风格的是
在面向对象方法中,属性与操作相似的一组对象称为______。
数据结构分为逻辑结构与存储结构,线性链表属于______。
在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,对应的事件过程是
在E-R图中,用来表示实体的图形是()。
对象是既包含数据又包含对______的方法,并将其封装起来的一个逻辑实体。
在满足实体完整性约束的条件下
随机试题
马克思主义中国化的基本要求是()
男,1天,足月臀位产,出生Apgar评分1分钟和5分钟各评8分、9分。生后5小时出现呕吐,呈喷射性,伴尖声哭叫、青紫、体温不升。查体:前囟饱满,心肺正常,拥抱反射消失。为明确诊断,首先应选择的检查方法是
指出下列制备蜜丸变硬的原因是
有一闸孔泄流的模型试验,在长度比尺λ1=10的模型上测得流量Qm=112L/s,在模型某点上测得流速vm=192cm/s,则相应的原型流量和原型流速分别是()。
远洋运输的优点是()。
【2018上】在Windows系统中,下列程序组可对系统资源进行管理的是()。
甲乙两人一起加工一批零件,计划加工速度之比为3:2,如果甲加工速度比计划每小时多加工20%,乙速度不变,那么比计划提前90分钟完成。如果乙先按计划速度加工900个,再加速50%,甲速度不变,也可提前90分钟完成。则这批零件共有()个。
在数据库系统中广泛应用的数据库查询语言SQL的全称是______。
Readthisarticleaboutmanagementbuyouts.Choosethebestsentencefromtheoppositepagetofilleachofthegaps.For
WhyAreAirlinesWithholdingSeats?[A]AfewmonthsagoIbookedaflightfortwoandthenwenttoselectseatsontheairline’
最新回复
(
0
)