2. 计算机
  3. 假定有如下程序： 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)

假定有如下程序： 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)

admin2016-06-23  22
问题 假定有如下程序：
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
解析 For循环对数组a和b赋值。b(3)=a(1)，b(2)=a(2)，b(1)=a(3)，循环结束时k=3。因此选A。
转载请注明原文地址:https://jikaoti.com/ti/jQJ0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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