下列程序 Option Base 1 Const upl = 10 Private Sub Form_click() Dim a(upl) As Integer k = -1 For i = 1 To upl a(i) = i * k k = -1 * k Next i For i = 1 To 10 Print a(i); Next End Sub 运行时输出的结果是 () 。
A. 1 3 5 7 9 10
B. -1 -3 -5 -7 -9
C. -1 2 -3 4 -5 6 -7 8 -9 10
D. 1 -2 3 -4 5 -6 7 -8 9 -10
查看答案
更多“下列程序 Option Base 1 Const upl = 10 Private Sub Form_click() Dim a(upl) As Integer k = -1 For i = 1 To…”相关的问题