下述VBA代码的输出结果是什么?该题目曾出现在去年考试中
VB循环代码为何会产生输出?
嘿,我来帮你理清这段代码的逻辑~你说原本以为因为k <> 0的判断,这段代码不会有输出,但实际上它不仅会输出,还会弹出5次消息框呢!咱们一步步拆解来看:
首先先把这段VB代码贴出来,方便分析:
Dim sum As Integer, k As Integer sum = 0 k = 5 Do While k <> 0 sum = sum + k * k MsgBox "sum" & sum k = k - 1 Loop
循环执行的完整流程
- 一开始
k被赋值为5,这时候k <> 0的条件是成立的(5不等于0),所以程序会进入循环体执行代码 - 第一次循环:
sum计算为0 + 5*5 = 25,然后弹出MsgBox显示sum25,接着k减1变成4 - 接下来每次循环都会先检查
k <> 0:只要k不等于0,就继续执行循环体里的代码。直到k被减到0的时候,循环条件不满足,才会终止循环 - 整个过程会循环5次,分别弹出显示
sum25、sum41、sum50、sum54、sum55的消息框
你可能搞混的点
你提到的<>是VB里的不等于运算符,Do While k <> 0的意思是“当k不等于0的时候,就执行循环体”,而不是“k等于0才执行”。如果是后者的情况,那确实不会有输出,但这里的条件刚好相反,所以循环会正常跑起来,自然就有输出啦。
内容的提问来源于stack exchange,提问作者Awais Zafar
相关产品推荐
相关产品推荐

