下列程序在运行时输出的结果是( )。 Option Base 1 Private Sub Form Click() Dim xf(0) Fori=1 To 10 x(i)=10-i+1 Next i For i=10 To 1 Step-2 Prin

admin2015-05-30 32

问题下列程序在运行时输出的结果是( )。
Option Base 1
Private Sub Form Click()
Dim xf(0)
Fori=1 To 10
x(i)=10-i+1
Next i
For i=10 To 1 Step-2
Print x(i)
Next i
End Sub

选项 A、1 3 5 7 9
B、9 7 5 3 1
C、1 2 3 4 5 6 7 8 9 10
D、10 9 8 7 6 5 4 3 2 1

答案A

解析本题考查数组元素的赋值。数组x元素的下标从1到10，元素分别为：10-下标+1(也就是10 9 8 7 6 5 4 3 2 1)。循环结束后，从高下标端输出偶数下标的元素。

转载请注明原文地址:https://jikaoti.com/ti/JD60FFFM

二级VB

相关试题推荐

随机试题

最新回复(0)