循环语句,直到满足某个条件
Sub 事例() Dim a% Do a = a + 1 If a > 10 Then MsgBox a & "大于10" Exit Do End If Loop End Sub
循环语句,直到满足某个条件
Sub 事例() Dim a% Do a = a + 1 If a > 10 Then MsgBox a & "大于10" Exit Do End If Loop End Sub
转载于:https://www.cnblogs.com/qcl_008/p/4810495.html