首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base 0 Private Sub Command 1 Click() Dim A 1(4)As Integer,A2(4)As Integer For k=0 T
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base 0 Private Sub Command 1 Click() Dim A 1(4)As Integer,A2(4)As Integer For k=0 T
admin
2020-01-02
41
问题
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码:
Option Base 0
Private Sub Command 1 Click()
Dim A 1(4)As Integer,A2(4)As Integer
For k=0 To 2
A1(k+1)=InputBox("请输入一个整数")
A2(3-k)=A1(k+1)
Next k
Print A2(k)
End Sub
程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6,则输出结果为
选项
A、0
B、1
C、2
D、3
答案
C
解析
本题的关键之处在于抓住每次具体给哪个数组元素进行了赋值,第一次循环中输入的2被赋给了A1(1)和A2(3),第二次循环中输入的4被赋给了A1(2)和.A2(2),第三次循环中输入的6被赋给了A1(3)和A2(1),跳出循环时k的值为3,所以最后输出2。
转载请注明原文地址:https://www.kaotiyun.com/show/e6Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为C1和C2,标题分别为“显示”和“扩大”,编
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个圆和一条直线(直线的名称为Line1)构成一个钟表的图案;有两个命令按钮,名称分别为Command1、Command2,标题分别为“开始”、“停止”;还有一个名为Timer1的计时器。程序运行时
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为Text1的文本框,其高、宽分别为400、2000。运行后的窗体如图3—112所示。请在属性框中设置适当的属性满足以下要求:
设x是小于10的非负数。对此陈述,以下正确的VB表达式是
以下关于过程的叙述中,错误的是
为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为
以下表达式与Int(3.5)的值相同的是
不能正确表示条件“两个整型变量A和B之一为0,但不能同时为0”的布尔表达式是()。
在软件开发中,需求分析阶段可以使用的工具是()。
随机试题
新年来临,公司宣传部需要为销售部门设计并制作一份新年贺卡以及包含邮寄地址的标签,由销售部门分送给相关客户。按照下列要求完成贺卡以及标签的设计和制作。打开考生文件夹下的文档“Word素材.docx”,将其另存为“Word.docx”(“.docx”为文件
按照瀑布学说从Ⅻ被激活到Ⅸa-Ca-Ⅷa复合物的形成被称为
溃疡病急性穿孔的典型体征可排除阑尾炎体征
下列情况中应浇洒透层沥青的是()。
上海期货交易所交易的品种包括( )。
沈浩同志是新时期共产党的优秀代表,是农村基层干部的楷模。中共中央组织部号召全国各条战线的共产党员和广大干部向沈浩同志学习,其采用的公文形式是()。
荀子曰:“不闻不若闻之,闻之不若见之。”这句话所体现的教学原则是()。
滞胀[深圳大学2011金融硕士]
Agoodwaytopassanexaminationistostudyhardeverydayintheyear.Youmayfailinanexaminationifyouarelazyformos
Leptiniseffectiveinreducingweightbutit’smanyyearsawaybeforehumanscanuseit.Leptinplaysanimportantroleinadj
最新回复
(
0
)