2. 计算机
  3. 下列程序运行时输出的结果是( )。 Option Base 1 Const a=10 Private Sub Form_Click() Dim x(a)As Integer k=-1 For i=1 To a

下列程序运行时输出的结果是( )。 Option Base 1 Const a=10 Private Sub Form_Click() Dim x(a)As Integer k=-1 For i=1 To a

admin2010-11-20  30
问题 下列程序运行时输出的结果是(    )。  Option Base 1  Const a=10  Private 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。
转载请注明原文地址:https://www.kaotiyun.com/show/Iamp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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