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)

admin2020-04-18  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
解析 本题在循环中输入数据，当第一次输入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://jikaoti.com/ti/VPx0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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