发布网友 发布时间:2024-10-24 05:33
共3个回答
热心网友 时间:2024-11-10 04:52
Dim A as long
Private Sub AAA()
T = GetTickCount
Do
If GetTickCount - T >= 100000 Then Exit Do
If A=1 Then Exit Do
DoEvents
Loop
End Sub
在窗口事件中加
A=1
就可以了啊
热心网友 时间:2024-11-10 04:52
用这种方法,那窗体还在内存中,怎样能完全卸载?
跳出循环-----------窗口关闭,这还有什么讨论的?
热心网友 时间:2024-11-10 04:53
3e2r tiab9u9q哦青年哦去你去哪【- 陪你你