首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下事件过程: Private Sub Form_Click() Sum=0 For k=1 To 3 If k
设有如下事件过程: Private Sub Form_Click() Sum=0 For k=1 To 3 If k
admin
2020-07-22
50
问题
设有如下事件过程:
Private Sub Form_Click()
Sum=0
For k=1 To 3
If k<=1 Then
x=1
ElseIf k<=2 Then
x=2
ElseIf k<=3 Then
x=3
Else
x=4
End If
Sum=Sum+x
Next k
Print Sum
End Sub
程序运行后,单击窗体,输出结果是( )。
选项
A、9
B、6
C、3
D、10
答案
B
解析
程序执行过程如下:
k=1,k<=1成立,执行x=1,sum=sum+x=1
k=2,k<=2成立,执行x=2,sum=sum+x=1+2=3
k=3,k<=3成立,执行x=3,sum=sum+x=3+3=6,循环结束。因此最后输出Sum的值为6。
转载请注明原文地址:https://www.kaotiyun.com/show/jDHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有Command1、Command2两个命令按钮。现编写以下程序:OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCommand1_Click()m=InputBox("请输入一个正
设有下面程序代码:OptionBase1PriVateSubCommand1_Click()Dimx(6)a=Array(4,2,5,1,6,3)b=Array(64,24,98,27,58,41)Fork=1To6x(a(k))=
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是()。
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:PrivateSubCommand1_Click()a=InputBox("Enteraninteger"):
窗体上已有1个名称为Pieture1的图片框,要求实现下面2个功能之一:①在窗体上移动鼠标时,立即将Picture1显示在鼠标位置②在窗体上单击鼠标时,立即将Pieture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
设Label1、Command1、Text1、Check1分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
设窗体上有1个名称为HScroll1的水平滚动条,其Max、Min属性分别设置为100、1;有2个名称分别为Option1、Option2的单选按钮,其标题分别为“30”、“50”;还有下面程序代码:PrivateSubOptionl_Clic
设窗体上有一个Picture1图片框,要求在图片框中的指定位置(坐标为(500,300))输出“OK”,下面可以实现这一功能的事件过程是
下列程序段的输出结果是x=5Printx+1;x+1
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。程序功能如下:(1)考生文件夹下in
随机试题
点焊在焊接过程中不需加热、熔化,不需外加_________。
许某因盗窃罪被公安机关立案侦查并采取强制措施,在侦查机关告知许某所享有的权利后,许某委托了某律师事务所的律师张某为其提供法律帮助。在办理委托手续的过程中,张某宣传自己和法院院长是好朋友,并承诺如果让其担任辩护人,定可以减轻刑罚,许某表示同意。在为许某提供法
中国营养学会推荐我国居民碳水化合物的膳食供给量应占总能量的
下列哪项是最常见的睾丸肿瘤
【2006年第4题】题6~10:某矿区内拟建一座35/10kV变电所,两回35kv架空进线、设两台主变压器,型号为S9—6300/35,采用屋内双层布置,主变压器室、电容器室、维修问、备件库均布置在一层,35kV配电室、控制室布置在二层。请回答以下问题,并
()是保证服务内容能够准确实施的保障性手段,应当给予高度重视。
斯塔夫里阿诺斯说:“罗马人在思想意识方面最重要的贡献在于,他们的法律是基于理性而不是基于习俗。”对“理性”的正确理解是()。
下列选项中,适合飞机制造行业的市场结构是()。
A.medicalB.soC.consideredA.Severalhotdaysare【T7】______aheatwave.B.【T8】______doesextremeheat.C.causeser
在表单设计中,This关键字的含义是指()。
最新回复
(
0
)