&

[VB]如何使點擊新窗口仍然使用VB自己的窗口而不是IE瀏覽器

當前位置：點晴教程→知識管理交流 →『技術文檔交流』

admin

2013年11月14日 16:58 本文熱度 5418

在窗體中插入一個WebBrowser1，然后在代碼頁寫入：

Dim StatusText As String

Private Sub Form_Load()
WebBrowser1.Navigate "End Sub

Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
Set nform = New Form1
Set ppDisp = nform.WebBrowser1.Object
nform.Show
End Sub

Private Sub webbrowser1_documentcomplete(ByVal pDisp As Object, URL As Variant)
MsgBox WebBrowser1.Document.Title
Cancel = 0
Text1.Text = URL
    If URL = "/index.asp" Then
    Me.Width = 14000
    Me.Height = 8000
    End If
End Sub

Private Sub W_StatusTextChange(ByVal Text As String)
Label2.Caption = "網址：" & WebBrowser1.LocationName
Label1.Caption = "url:" & WebBrowser1.LocationURL
End Sub

該文章在 2013/11/14 16:58:03 編輯過

關鍵字查詢

正在查詢...

點晴ERP是一款針對中小制造業的專業生產管理軟件系統,系統成熟度和易用性得到了國內大量中小企業的青睞。

點晴PMS碼頭管理系統主要針對港口碼頭集裝箱與散貨日常運作、調度、堆場、車隊、財務費用、相關報表等業務管理，結合碼頭的業務特點，圍繞調度、堆場作業而開發的。集技術的先進性、管理的有效性于一體，是物流碼頭及其他港口類企業的高效ERP管理信息系統。

點晴WMS倉儲管理系統提供了貨物產品管理,銷售管理,采購管理,倉儲管理,倉庫管理,保質期管理,貨位管理,庫位管理,生產管理,WMS管理系統,標簽打印,條形碼,二維碼管理,批號管理軟件。

點晴免費OA是一款軟件和通用服務都免費，不限功能、不限時間、不限用戶的免費OA協同辦公管理系統。

91网首页-91网页版-91网在线观看-91网站免费观看-91网站永久视频-91网站在线播放

[VB]如何使點擊新窗口仍然使用VB自己的窗口而不是IE瀏覽器