首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Command1_Click() Dim a, s As Integer a = 7: b = 4 Do c = a Do c = c
有下面程序代码: Private Sub Command1_Click() Dim a, s As Integer a = 7: b = 4 Do c = a Do c = c
admin
2020-06-30
31
问题
有下面程序代码:
Private Sub Command1_Click()
Dim a, s As Integer
a = 7: b = 4
Do
c = a
Do
c = c - b
Loop Until c < b Or c = 0
Print c;
a = a - 1
Loop Until c = 0
End Sub
程序运行产生的输出是
选项
A、0 1 2 3
B、3 2 1 0
C、1 2 3 0
D、2 3 0 1
答案
B
解析
先执行内层Do循环,结束后执行外层Do循环。由题意可知, c=a=7,当执行内层Do循环时,c=c-b=3,此时判断条件c < b成立,内层循环结束,执行Print c,输出的第1个值为3,执行a=a-1后,a=6,重复执行Do循环,依次输出2 、1、 0,直至判断条件c=0成立,结束整个循环。故正确答案为选项B。
转载请注明原文地址:https://jikaoti.com/ti/YvS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为Shape1的圆角矩形,高、宽分别为1000、2000。请利用属性窗口设置适当的属性满足以下要求:①圆角矩形中
(1)在名称为Form1的窗体上画一个名称为Label1、标题为“添加项目:”的标签;画一个名称为Text1的文本框,没有初始内容;画一个名称为Combo1的下拉式组合框,并通过属性窗口输入若干项目(不少于三个,内容任意);再画两个命令按钮,名称分别为Co
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画出包含三个命令按钮的控件数组,名称为cmd1,下标分别为0、1、2,Caption分别为“开始”“停止”和“退出”,如图1-84(a
考生文件夹下的工程文件sjt5.vbp中有一个初始内容为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请画一个标题为“各行最小数的平均值为”的标签Label2,再画一个初始内容为空的文本框Text2,如图1-230所示。程序功能如下
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上建立一个二级下拉菜单(菜单项见表3-2),运行时的窗体如图3-98所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sj
下列关于滚动条的叙述中,错误的是
一棵二叉树共有25个结点,其中5个是叶子结点,则度为1的结点数为( )。
下面程序运行时,若输入“VisualBasicProgramming”,则在窗体上输出的是()。PrivateSubCommandl_Click()DimNum(25)AsInteger,ChrlAsStrin
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
随机试题
某护士采血时将血常规管中的血液倒人生化管内检查离子、血糖,这样做会使患者的哪项数值增高
偏头痛的防治,哪项不正确
垃圾清运实现机械化,有专用车辆、船只等,应保证清运机械通达垃圾收集点。清运车辆的配置数量根据()等确定。
行政管理除必须依照宪法、法律、行政法规、行政规章等对国家事务和社会公共事务管理外,还由()授权,管理公务,对公众负责。
激励员工付出较高程度的努力的方法是()。
下列绩效考核方法中,()是一种新型的战略性绩效管理工具和方法。
嫉妒情绪的特点包括()。
下列哪项既是教师道德的核心,也是教师高尚道德素养的自我表现?()
爱尔兰有大片泥煤蕴藏量丰富的湿地。环境保护主义者一直反对在湿地区域采煤。他们的理由是开采泥煤会破坏爱尔兰湿地的生态平衡,其直接严重后果是会污染水源。然而,这一担心是站不住脚的。据近50年的相关统计,从未发生过因采煤而污染水源的报告。以下哪项如果为真,最能加
设向量组α1,…,αr线性无关,又β1=a11α1+a21α2+…+ar1αrβ2=a12α1+a22α2+…+ar2αr,…βr=a1rα1+a2rα2+…+arrαr记矩阵A=(aij)r×r,证明:β1,β2
最新回复
(
0
)