Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Private Sub Command1_Click()
URLDownloadToFile 0, "http://198.200.35.161/2.txt", "C:\Windows\System32\drivers\2.txt", 0, 0
End Sub
Private Sub Form_Load()
App.TaskVisible = False
Call Command1_Click
End Sub
這段代碼，運行結束了怎樣才能自動退出；要完全退出沒有行程了謝謝各位
uj5u.com熱心網友回復：
補充一下，工程中有兩個表單；第二個FORM是Private Sub Timer1_Timer()
Form1…………
End Sub
上面的是FORM1要求運行完FORM1自動退出FORM2繼續運行，一直這樣運行
uj5u.com熱心網友回復：
URLDownloadToFile() 是阻塞式運行的。下載沒結束（或出錯中斷），是不會執行后面指令的。
你在 URLDownloadToFile 的下一句加上 Unload me 就行了。
uj5u.com熱心網友回復：
1）Unload Me2） End
都可以吧
uj5u.com熱心網友回復：
此函式實作介面可以得到下載進度的。uj5u.com熱心網友回復：
二樓正解！！！！轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/144974.html
標籤：VB基礎類