改用timer控件来做,设置下interval属性为1000(1秒)就可以了:Dim i As IntegerPrivate Sub Form_Load() i = 1End SubPrivate Sub Timer1_Timer() Label1Caption = ClipboardGetText() If i > 3 Then Timer1Enabled = False i = i + 1
End Sub
以上就是关于VB中无限循环的程序怎么在form中异步执行全部的内容,包括:VB中无限循环的程序怎么在form中异步执行、、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)