问题
单项选择题
下列程序的运行结果为______。Private Sub Command1_ Click() Dim s As Long Dim x As Integer s = 0 for x = 99 To 1 step - 2s=s+ x Next x Print sEnd Sub
A．100
B．500
C．2500
D．5000
答案
参考答案：C
解析： 单循环次数“r=int((终值-初值+步长)/步长)”。计算结果是将1～100内的奇数相加。