程序执行时，单击窗体后输出结果是 Private sub form_click() Dim n as Integer n = 8 While n > 5 n = n - 1 Debug.Print

admin2020-09-01 40

问题程序执行时，单击窗体后输出结果是
Private sub form_click()
Dim n as Integer
n = 8
While n > 5
n = n - 1
Debug.Print n;
Wend
End Sub

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

答案C

解析本题实际上是给出了一个计算1至99之间奇数之和的程序，x初始为99，每循环一次递减2。第一次循环结果：x=99，s=0+99=99；第二次循环结果：x=97，s=99+97；以此类推，直至x=1，s=99+97+95+…+1=2500。

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

二级Access

相关试题推荐

随机试题

最新回复(0)