假定有如下程序： Private Sub Form Click() Dim a(4)As Integer，b(4)As Integer For k=0 To 2 a(k+1)=Val(InputBox("请输入一个整数

admin2019-01-17 39

问题假定有如下程序：
Private Sub Form Click()
Dim a(4)As Integer，b(4)As Integer
For k=0 To 2
a(k+1)=Val(InputBox("请输入一个整数："))
b(3-k)=a(k+1)
Next k
Print b(k)
End Sub
运行程序，单击窗体，依次输入3、6、9，输出结果为

选项 A、3
B、6
C、9
D、1

答案A

解析本题在循环中输入数据，当第一次输入3的时候a(1)=3，b(3)=a(1)=3；当第二次输入6的时候a(2)=6，b(2)=a(2)=6：当第三次输入9的时候a(3)=6，b(1)=a(3)=9，跳出循环后k的值为3，将输出b(3)的值。

转载请注明原文地址:https://kaotiyun.com/show/USFp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

以下程序的功能是随机产生10个两位的整数：OptionBase1PrivateSubCommand1_Click()　　Dima(10)AsInteger　　DimiAsInteger　　Randomize　　Fori＝1
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimiAsInteger，nAsInteger　　Fori＝0To
现有如下语句：x＝IIf(a＞50，Int(a\3)，aMod2)当a＝52时，x的值是(　　)。
为了使每秒钟发生一次计时器事件，可以将其Interval属性设置为(　　)。
有三个关系R、S和T如下：则由关系R和S得到关系T的操作是(　　)。
以下不合法的VB变量名是
优化数据库系统查询性能的索引设计属于数据库设计的
设有表示公司和员工及雇佣的三张表，员工可在多家公司兼职，其中公司Ｃ（公司号，公司名，地址，注册资本，法人代表，员工数），员工Ｓ（员工号，姓名，性别，年龄，学历），雇佣Ｅ（公司号，员工号，工资，工作起始时间）。其中表Ｃ的键为公司号，表Ｓ的键为员工号，则表Ｅ的
某个工厂有若干个仓库，每个仓库存放有不同的零件，相同零件可能放在不同的仓库中。则实体仓库和零件间的联系是
对于某些控件，只要将其Style属性设置为1，则可以在该控件上使用Picture属性显示图片。以下不具备这一使用规则的控件是

随机试题

我国资本主义工商业进行社会主义改造实践中的一个创新性办法是对资本主义工商业（）
下列词语中，对《饮酒》(其五)全诗构思起纲领作用的是()
井巷支护的目的是()。
由于发包人或工程师指令承包人加快施工速度，缩短工期，工程师应批准承包人的(　　)索赔。
商业银行可以采取()措施进行操作风险缓释。
甲投资方案投资当年的通货膨胀率为5％，名义折现率为11．3％，则该方案的实际折现率为()。
关于集体合同，下列表述正确的是()。
经过半个小时，钟面上分针转过的角度与时针转过的角度相差()。
设m×n矩阵A的秩为r，且r＜n，已知向量η是非齐次线性方程组Aχ＝b的一个解．试证：方程组Aχ＝b存在n－r＋1个线性无关的解，而且这n－r＋1个解可以线性表示方程组Aχ＝b的任一解．
A向B发送消息P，并使用公钥体制进行数字签名。设E表示公钥，D表示私钥，则B要保留的证据是(45)。基于数论原理的RSA算法的安全性建立在(46)的基础上。Kerberos是MIT为校园网设计的身份认证系统，该系统利用智能卡产生(47)密钥，可以防止窃听

最新回复(0)

假定有如下程序： Private Sub Form Click() Dim a(4)As Integer，b(4)As Integer For k=0 To 2 a(k+1)=Val(InputBox("请输入一个整数

二级VB

NCRE全国计算机二级

以下程序的功能是随机产生10个两位的整数：OptionBase1PrivateSubCommand1_Click() Dima(10)AsInteger DimiAsInteger Randomize Fori＝1

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click() DimiAsInteger，nAsInteger Fori＝0To

现有如下语句：x＝IIf(a＞50，Int(a\3)，aMod2)当a＝52时，x的值是( )。

为了使每秒钟发生一次计时器事件，可以将其Interval属性设置为( )。

有三个关系R、S和T如下：则由关系R和S得到关系T的操作是( )。

以下不合法的VB变量名是

优化数据库系统查询性能的索引设计属于数据库设计的

某个工厂有若干个仓库，每个仓库存放有不同的零件，相同零件可能放在不同的仓库中。则实体仓库和零件间的联系是

对于某些控件，只要将其Style属性设置为1，则可以在该控件上使用Picture属性显示图片。以下不具备这一使用规则的控件是

我国资本主义工商业进行社会主义改造实践中的一个创新性办法是对资本主义工商业（）

下列词语中，对《饮酒》(其五)全诗构思起纲领作用的是()

井巷支护的目的是()。

由于发包人或工程师指令承包人加快施工速度，缩短工期，工程师应批准承包人的( )索赔。

商业银行可以采取()措施进行操作风险缓释。

甲投资方案投资当年的通货膨胀率为5％，名义折现率为11．3％，则该方案的实际折现率为()。

关于集体合同，下列表述正确的是()。

经过半个小时，钟面上分针转过的角度与时针转过的角度相差()。

设m×n矩阵A的秩为r，且r＜n，已知向量η是非齐次线性方程组Aχ＝b的一个解．试证：方程组Aχ＝b存在n－r＋1个线性无关的解，而且这n－r＋1个解可以线性表示方程组Aχ＝b的任一解．

以下程序的功能是随机产生10个两位的整数：OptionBase1PrivateSubCommand1_Click()　　Dima(10)AsInteger　　DimiAsInteger　　Randomize　　Fori＝1

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimiAsInteger，nAsInteger　　Fori＝0To

现有如下语句：x＝IIf(a＞50，Int(a\3)，aMod2)当a＝52时，x的值是(　　)。

为了使每秒钟发生一次计时器事件，可以将其Interval属性设置为(　　)。

有三个关系R、S和T如下：则由关系R和S得到关系T的操作是(　　)。

由于发包人或工程师指令承包人加快施工速度，缩短工期，工程师应批准承包人的(　　)索赔。