[Klik hier voor een 2005 versie van het project]
Visual Basic .NET heeft in versie 2003 geen webbrowser aan
boord. Je kan echter wel een oude (COM) component toevoegen met Project, Add
Reference.
Visual Studio zorgt achter de scene voor de nodige handelingen om die COM
component te laten werken.
De control staat nog niet in je toolbox? Rechtsklik in je toolbox om de control toe te voegen:
We kunnen een toolbar toevoegen, een textbox en tenslotte plaatsen we een webbrowser op het formulier.
De code ziet er zo uit:
Private Sub ToolBar1_ButtonClick(ByVal
sender As System.Object, ByVal e As
System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case e.Button.Text
Case "Vorige"
AxWebBrowser1.GoBack()
Case "Volgende"
AxWebBrowser1.GoForward()
Case "Stop"
AxWebBrowser1.Stop()
Case "Vernieuwen"
AxWebBrowser1.Refresh2()
Case "Zoeken"
AxWebBrowser1.GoSearch()
Case "Thuis"
AxWebBrowser1.GoHome()
End Select
End Sub
Private Sub txtUrl_KeyPress(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles txtUrl.KeyPress
If Asc(e.KeyChar) = 13 Then 'enter gedrukt
AxWebBrowser1.Navigate2(txtUrl.Text)
End If
End Sub
Private Sub AxWebBrowser1_NavigateComplete2(ByVal sender As Object, ByVal e As
AxSHDocVw.DWebBrowserEvents2_NavigateComplete2Event) Handles
AxWebBrowser1.NavigateComplete2
txtUrl.Text = AxWebBrowser1.LocationURL
End Sub
Je kan het programma en het project downloaden.
In versie 2005 van Visual Studio is er wel een Webbrowser control. Ook daarme hebben we een programma uitgebouwd dat je hier kan vinden.