首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下事件过程: 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
2015-08-28
52
问题
设有如下事件过程:
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://kaotiyun.com/show/Z4Qp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上建立一个名称为Commandl的命令按钮数组,含三个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消”,每个按钮的
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个水平滚动条,其名称为HScrolll,然后通过属性窗口设置窗体和滚动条的属性,实现如下功能:①窗体标题为“设置滚动条属性”;②滚动条所能
在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件(如图1-113所示)。请编写适当的事件过程完成以下功能:单击“读数”按钮,则把考生目录下的in5.txt文件中的一个整数放入Textl:单击“计算”按钮,则计算出大于该数的第一个素数,并
在窗体上画一个命令按钮;然后编写如下程序:Functionfun(ByValnumAsLong)AsLongDimkAsLongk=1num=Abs(num)DoWh
由如下程序:TypeStudentNumAsIntegerNameAsString*13EndTypeDimstu(30)AsStudent该程序段定义了两个程序成分,它们分
下列哪条语句是错的______。
当我们输入代码时,VisualBasic可以自动检测______错误。
VisualBasle一共有设计、运行和中断三种模式,要使用调试工具应该______。
下述关于数据库系统的叙述中正确的是______。
常用的软件结构设计工具是结构图(SC),也称程序结构图。其中,用矩形表示______,用带空心圆的箭头表示传递的是数据。
随机试题
患儿男性,6岁,主因“发现血尿5年余”入院。5年前患儿因呼吸道感染检查时发现尿蛋白(-),尿隐血试验(+),尿红细胞5~10/HP,未予重视。为明确诊断特来我院。既往、个人史无特殊,家族中有一个舅舅35岁时死于肾衰竭。查体:体温36.5℃,脉搏90次/mi
我国未来的产业重点是什么?
经评标委员会讨论,并经至少()以上委员同意,提出需投标人澄清的问题,以书面形式送达投标人。
清代《古今图书集成》是当时我国也是世界上最大的一部丛书。()
使物流服务不断适应需求者的多样性,克服(),已经成为物流业经营上的重要课题。
A、 B、 C、 D、 D题干有且仅有第一个和第六个字符相同,只有D项符合。
一、注意事项1.申论考试与传统的作文考试不同.是分析驾驭材料的能力与表达能力并重的考试。2.仔细阅读给定的资料,按照后面提出的“作答要求”依次作答在答题纸指定位置。3.答题时请认准题号,避免答错位置影响考试成绩。4.
Completesilenceisfoundonlyinlaboratoriescalledanechoicrooms.Thewallsandceilings,madeofblocksofspecialsound-su
假设外部设备的状态字已经读入AL寄存器,其中最低位为“0”,表示外部设备“忙”。为了判断外部设备是否“忙”而又不破坏其他状态位,应选( )指令。
A、Afitnessprogramofferedtothegeneralpublic.B、Aphysicalexercisetobuildupmuscles.C、Aprogramthatmakespeoplekeep
最新回复
(
0
)