下列程序的运行结果为______。Private Sub Command1_ Click() Dim s As Long Dim x As Integer s = 0 for x = 99 To 1 step - 2

admin2013-04-11 37

问题下列程序的运行结果为______。Private Sub Command1_ Click() Dim s As Long Dim x As Integer s = 0 for x = 99 To 1 step - 2 s=s+ x Next x Print sEnd Sub

选项 A、100
B、500
C、2500
D、5000

答案C

解析单循环次数“r=int((终值-初值+步长)/步长)”。计算结果是将1～100内的奇数相加。

转载请注明原文地址:https://www.kaotiyun.com/show/Behp777K

二级VB

相关试题推荐

随机试题

最新回复(0)