Private Sub Comkmand1_Click()Dim a as Booleana = TrueIf a Then GoTo L1 Else GoTo L2L1:Print "VB"L2:Print "VC"End Sub程序输出结果为 VBVC为什么?什么叫顺序输出?
2 回答
陪伴而非守候
TA贡献1757条经验 获得超8个赞
程序已经成功跳转到了L1标签处,结果执行完L1行的语句后,程序又顺序执行下去了,你可以这样改
Private Sub Comkmand1_Click()
Dim a as Boolean
a = True
If a Then GoTo L1 Else GoTo L2
L1:Print "VB"
GoTo End
L2:Print "VC"
End:
End Sub
添加回答
举报
0/150
提交
取消