同步和异步主要应用于多线程程序的。
VB6.0的线程模型是单线程模式,一般的处理都是同步的,但要实现异步就比较麻烦,包括创建线程、线程同步和线程的异步回调都很难实现。建议升级到VB.Net。
调用一个 shell 执行某程序,一定要等这个外部程序退出才继续运行下面的语句
--------------
代码如下:
Sub ShellWait(cCommandLine As String)
Dim hShell As Long
Dim hProc As Long
Dim lExit As Long
hShell = Shell(cCommandLine, vbNormalFocus)
hProc = OpenProcess(PROCESS_QUERY_INFORMATION, False, hShell)
Do
GetExitCodeProcess hProc, lExit
DoEvents
Loop While lExit = STILL_ACTIVE
End Sub
webbrowser控件访问一个url,一定要等页面下载完成后才继续下面的语句.
------------------
webbrowser控件本身是一个异步下载的控件,使用DownloadComplete事件可以实现异步操作,使用Busy属性可以实现同步操作。