Web Browser Sederhana dengan VB.NET

Web Browser Class - Cara mudah membuat aplikasi Web Browser sederhana VB.NET menggunakan Class WebBrowser Vb.Net, Programer Vb.Net memungkinkan untuk membuat aplikasi webbrowser untuk keperluan mengaksess internet dan web page, pemrograman Vb.Net menyediakan class webBrowser untuk melakukannya, Tutorial sector code sebelumnya tentang Penggunaan HttpWebRequest Class, HttpWebResponse Vb.Net, simak tutorialnya step - by - step ya.

Cara membuat aplikasi Web Browser Sederhana

Buatlah form baru dengan nama "WebBrowser" dan desain tampilan browser kamu kurang lebih seperti tampilan berikut ini :

Komponent - komponent dari aplikasi Web Browser diatas sbb :

1. WebBrowser
2. ToolStrip
3. StatusStrip
4. Button (add dari ToolStrip)
5. TextBox (add dari ToolStrip)

Code Tombol Back

    Private Sub ToolStripButton1_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton1.Click
        WebBrowser1.GoBack()
    End Sub

Code Tombol Forward

    Private Sub ToolStripButton2_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton2.Click
        WebBrowser1.GoForward()
    End Sub

Code Tombol Home

    Private Sub ToolStripButton5_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton5.Click
        WebBrowser1.GoHome()
    End Sub

Code Tombol Stop

    Private Sub ToolStripButton4_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton4.Click
        WebBrowser1.Stop()
    End Sub

Code Tombol Go

    Private Sub ToolStripButton6_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton6.Click
        WebBrowser1.Navigate(ToolStripTextBox1.Text)
    End Sub

Code Tombol Refresh

    Private Sub ToolStripButton3_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton3.Click
        WebBrowser1.Refresh()
    End Sub

WebBrowser Complate

    Private Sub WebBrowser1_DocumentCompleted(sender _
        As System.Object, _
        e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) _
        Handles WebBrowser1.DocumentCompleted
        ToolStripStatusLabel2.Text = e.Url.ToString()
    End Sub

Sehingga Code dari keseluruhan aplikasi sederhana web browser ini silahkan lihat detailnya dibawah ini :

Public Class WebBrowser

    Private Sub ToolStripButton1_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton1.Click
        WebBrowser1.GoBack()
    End Sub

    Private Sub ToolStripButton2_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton2.Click
        WebBrowser1.GoForward()
    End Sub

    Private Sub ToolStripButton5_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton5.Click
        WebBrowser1.GoHome()
    End Sub

    Private Sub ToolStripButton4_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton4.Click
        WebBrowser1.Stop()
    End Sub

    Private Sub ToolStripButton6_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton6.Click
        WebBrowser1.Navigate(ToolStripTextBox1.Text)
    End Sub

    Private Sub WebBrowser1_DocumentCompleted(sender _
        As System.Object, _
        e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) _
        Handles WebBrowser1.DocumentCompleted
        ToolStripStatusLabel2.Text = e.Url.ToString()
    End Sub

    Private Sub ToolStripButton3_Click(sender _
        As System.Object, e As System.EventArgs) _
        Handles ToolStripButton3.Click
        WebBrowser1.Refresh()
    End Sub
End Class