可以在form里用默認的瀏覽器打開網址嗎?而不是全部都是ie打開
uj5u.com熱心網友回復:
用shelluj5u.com熱心網友回復:
可以具體一些嗎?最好貼上代碼,謝謝uj5u.com熱心網友回復:
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
'宣告
Private Sub Command1_Click()
Dim r As Long
r = ShellExecute(0, "open", "http://www.baidu.com", 0, 0, 1)
End Sub
Private Sub Command2_Click()
Dim url As String
url = "http://www.baidu.com"
Shell "cmd.exe /c start " & url, 0
End Sub
uj5u.com熱心網友回復:
Shell 方法只是打開,不能在你的 Form 中打開。轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/119338.html
標籤:控件
下一篇:VB編程(時間欄位比較)
