假定有如下程序: Private Sub Form_Click() Dim a(4) As Integer, b(4) As Integer For k = 0 To 2 a(k + 1) = Val(InputBox("请

admin2020-02-27  25

问题 假定有如下程序:
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/rWx0FFFM
0

最新回复(0)