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("请输入一个整数

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

admin2019-07-30  48
问题 假定有如下程序：
    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://www.kaotiyun.com/show/taUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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