扫码加入数据分析学习群

Sub test()

Dim n%, y%, x%

For n = 1 To 3

' MsgBox "外层循环第" & n & "次"

For y = 1 To 10

' MsgBox "内层循环第" & y & "次"

x = x + 1

Next y

Next n

MsgBox "内层循环代码被执行了" & x & "次"

End Sub