[单项选择题] 下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x (10)As Int

[单项选择题] 下列程序运行时输出的结果是

Option Base 1

Private Sub Form_Click()

Dim x (10)As Integer，y(5)As Integer

For i=1 to 10

x(i)=10-i+1

Next

For i=1 to 5

y(i)=x(2*i-1)+x(2*i)

Next

For i=1 to 5

Print y(i)

Next

End Sub

A．3 7 11 45 19

B．19 15 11 7 3

C．1 3 5 7 9

D．不确定的值

B

本题考查了数组的定义和赋值。题中定义了数组x(10)和y(5)并通过For循环给每个数组成员赋值。