2. 计算机
  3. 在窗体上画一个命令按钮，名称为Command1，然后编写如下代码： Option Base 0 Private Sub Command1_Click() 　　Dim A1(4)As Integer， A2(4)As Integer 　　For k＝0 To

在窗体上画一个命令按钮，名称为Command1，然后编写如下代码： Option Base 0 Private Sub Command1_Click() 　　Dim A1(4)As Integer， A2(4)As Integer 　　For k＝0 To

admin2019-06-20  37
问题 在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：
Option Base 0
Private Sub Command1_Click()
　　Dim A1(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
解析 程序运行过程如下：
k＝0，输入2，A1(k＋1)＝A1(0＋1)＝A1(1)＝2，A2(3－k)＝A2(3－0)＝A2(3)＝2
k＝1，输入4，A1(k＋1)＝A1(1＋1)＝A1(2)＝4，A2(3－k)＝A2(3－1)＝A2(2)＝4
k＝2，输入6，A1(k＋1)＝A1(2＋1)＝A1(3)＝6，A2(3－k)＝A2(3－2)＝A2(1)＝6
k＝3，For循环结束，输出A2(k)的值即A2(3)的值，即2。
转载请注明原文地址:https://kaotiyun.com/show/SSUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)