vb

[lllllzzzzk]

在窗体上实现四次"认真学习vb" ，每一次后面都加上出现的次数。最好使用for循环，有没有大佬能教一下急需 啊

[VB业余爱好者]

    Dim i As Integer
    
    For i = 1 To 4
        Print "认真学习VB" & i
        Sleep (500)
    Next

里面的Sleep (500)是调用的api函数，只为了能够看见结果一个一个出来，而不是一下子全出来。

[天中云雾]

引用 1 楼 VB业余爱好者 的回复:

    Dim i As Integer
    
    For i = 1 To 4
        Print "认真学习VB" & i
        Sleep (500)
    Next

里面的Sleep (500)是调用的api函数，只为了能够看见结果一个一个出来，而不是一下子全出来。

引用的API没说清楚：

Private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

[天中云雾]

 Do While ExistProcess("ASLUpdate.exe", wait) And i <= 600
                        Thread.Sleep(1000) : i += 1
                        If i >= 550 Then wait = False
                    Loop

这样也行。