[VB.NET] Membuat Web Browser Dengan Situs Pilihan – Visual Basic

Kali ini saya akan mencoba membahas mengenai pembuatan aplikasi web browser sederhana menggunakan aplikasi VB tentunya, dalam hal ini yaitu masih belum ada tombol navigation, text search dan lain lainnya. Karena untuk belajar pemrograman visual basic ini tidak boleh tergesa gesa alias ingin cepat cepat menguasainya secara keseluruhan, semuaanya terbatas dengan waktu dan pemahamannya. Jelas bahwa untuk belajar itu membutuhkan waktu yang banyak untuk memahaminya dan menerapkannya bahkan untuk mencoba berfikir dalam proses penerapannya, ga ga ga.

Manfaat dalam membuat aplikasi sederhana webbrowser ini tentunya, dalam penggunaan ComboBox kita dapat memasukkan alamat dan nama situs yang akan dituju misalkan google, facebook, twitter dan lain seterusnya . Kemudian dalam ComboBox itu dapat juga dimasukkan kode untuk memanggil “gambar”  sebagai image dari situs namenya yang tujuannya digunakan untuk menampilkan gambar dari situsname yang dilemparkan pada PictureBox nantinya.

kode program visual basic web browser

Membuat desain antarmuka  / bebas terserah agan

kode program visual basic web browser

Komponen yang dibutuhkan

Label : Digunakan untuk pemberian judul/Title pada sebuah desain

ComboBox :  Berfungsi untuk memilih dari daftar pilihan, perbedaannya hanya terletak pada tampilannya, ComboBox menampilkan data ketika mengklik tombol ( pilihannya disembunyikan) , sedangkan ListBox menampilkan semua daftar pilihan.

WebBrowser : Digunakan untuk menampilkan halaman situs yang akan dipilih melalui ComboBox

PictureBox : Digunakan untuk menampilkan image dari situs yang dipilih

Untuk code program bisa dilihat dibawah ini

——————————————————————————————————–

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

ComboBox1.Items.Add(“Google”)

ComboBox1.Items.Add(“Facebook”)

ComboBox1.Items.Add(“Twitter”)

End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

Try

Select ComboBox1.SelectedIndex

Case 0

WebBrowser1.Navigate(“https://www.google.com/”)

PictureBox1.Image = Image.FromFile(Application.StartupPath & “\google.jpg”)

Case 1

WebBrowser1.Navigate(“https://www.facebook.com/”)

PictureBox1.Image = Image.FromFile(Application.StartupPath & “\facebook.jpg”)

Case 2

WebBrowser1.Navigate(“https://twitter.com”)

PictureBox1.Image = Image.FromFile(Application.StartupPath & “\google.jpg”)

End Select

Catch ex As Exception

End Try

End Sub

End Class

Keterangan

ComboBox1.Items.Add(“Google”) //Untuk memberikan nama tampilan yang akan dipilih dari alamat situs yang disembunyikan

==============================================================

ComboBox1.SelectedIndexChanged

Try

Select ComboBox1.SelectedIndex

Case 0

WebBrowser1.Navigate(“https://www.google.com/”)

PictureBox1.Image = Image.FromFile(Application.StartupPath & “\google.jpg”)

==============================================================

Logikanya saja dalam comboBox  ”SelectedIndexChanged”  setelah memilih  nama dari alamat situs dalam beberapa pilihan tentunya “case 0, case 1, case 2, dst ” maka –

WebBrowser1.Navigate(“https://www.google.com/”) // agan pasti sudah tau tentunya webbrowser ini akan mengarah ke alamat mana .., dan tidak lupa juga pada PictureBox1.Image = Image.FromFile(Application.StartupPath & “\google.jpg”) // tentunya pada “PictureBox1.Image”  ini akan menampilkan image yang telah diberikan sesuai dengan image namenya.

Image.FromFile(Application.StartupPath & “\google.jpg”) // gambar yang akan dipanggil berarti dari  ”Application.StartupPath”  dimana tempat aplikasi tersebut dijalankan dengan nama  untuk gambarnya  ”google.jpg”