(23)下列程序运行时输出的结果是 Option Base 1 Const a=10 Priate Sub Form_Click() Dim x(a)

（23）下列程序运行时输出的结果是 Option Base 1 Const a=10 Priate Sub Form_Click() Dim x(a) As Integer k=-1 For i=1 To a x(i)=i*k k=(-1)*k Next i For i=1 To 10 Print x(i) Next i 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

C【解析】本题中两个For循环的作用分别为：为x数组元素赋值，在窗体上依次输出x数组元素的值。　　其中，为x数组元素赋值时，有“x(i)=i*k”和“k=(-1)*k”两条语句。k的值每次都取自己的相反数，这样，x数组元素的符号每次都在变化，第1个元素是-1，第2个元素是2，第3个元素是-3，依此类推；最后输出x元素的值为-1 2 -3 4 -5 6 -7 8 -9 10。