1. Hello Guest, selamat datang di Forum WinPoin. Kamu bisa bertanya, berdiskusi, sharing, dan ngobrolin apapun seputar Windows, Windows Phone, PC, Gadget, atau hal seputar Teknologi lainnya. Selamat berkomunitas! ;)

Membuat Dasar Web Browser di VB.Net Ala Yuzz181

Discussion in 'Developer Corner' started by Yusril Ibnu, Jun 6, 2014.

  1. Yusril Ibnu

    Yusril Ibnu Winpoin Staff Staff Member

    Joined:
    May 12, 2014
    Messages:
    6,349
    [​IMG]

    Kali ni saya akan Share Tutorial yang dibuat sendiri, dari source, SS sampai kalimatnya..., maka jika berkenan Silahkan +Rep :goodjob: . Disini saya akan bahas bagimana membuat browser..., tapi yang basic dulu ya... (mulai dari yg paling kecil dulu).
    Langsung saja....


    [​IMG]

    Saya Disini menggunakan Visual Studio 2013, Jadi kagak bakal beda jauh..
    Buka Aplikasi Visual Studio, lalu buat projek baru dengan bahasa Visual Basic.
    Pilih Windows Form Application. dan masukan nama sesuai yang anda mau..

    Tahap 1 : Design Web Browser
    [hr]

    Pada Toolbox, pilih web browser, drag ke windows form yg tersedia
    [​IMG]

    Masih di web browser, agar bagus ubah Achor jadi top, bottom, left, right pada properties.
    [​IMG]

    Kemudian tambahkan button dari toolbox sebanyak 4 buah, buat (name) pada properties menjadi :
    • Button1 = back_btn
    • Button2 = forward_btn
    • Button3 = stop_btn
    • Button4 = refresh_btn

    [​IMG]

    dan juga ubah Achornya juga.....
    • back_btn = top, left
    • forward_btn = top, left
    • stop_btn = top, right
    • refresh_btn = top, right

    [​IMG]


    jika sudah di properties pada "Text" ubah juga menjadi (ini contoh, silahkan kreasikan)
    tanpa tanda petik ya...
    • back_btn = "<"
    • forward_btn = ">"
    • stop_btn = "X"
    • refresh_btn = "R"
    sizenya sesuaikan sesuai selera (samakan)

    [​IMG]

    selanjutnya masukan textbox, drag dan sesuaikan. ubah (Name) menjadi url_box, lalu pada Text di properties masukan halaman Homepagenya, minsalnya http://www.google.com, jangan lupa achornya ubah menjadi top, left, right

    [​IMG]

    [​IMG]


    klik pada webbrowser.. pada url masukan halaman homepage tadi
    [​IMG]

    nah disini satukan posisi tempat tombol refresh dan stop..
    [​IMG]

    karena saya akan menambahkan tombol GO, ganti (Name) pada properties juga menjadi go_btn dengan achor top, right.
    Rapihkan semua posisi tombol, textbox dan webbrowsernya agar rapih.
    [​IMG]



    Tahap 2 Coding Web Browser
    [hr]

    [​IMG]
    Sebelumnya pastikan nama namanya sesuai dengan tahap pertama, agar hasilnya benar.
    penjelasan coding ada disetiap samping code 'bla bla bla itu adalah komentar (diawali kutip satu), untuk memudahkan saja, bisa dihapus kok.

    Code:
    Public Class Form1
        '===============================================================================|
        'Code By Yuzz181                                                                                                    
        'http://forum.winpoin.com                                                      
        '===============================================================================|
    
        Private Sub back_btn_Click(sender As Object, e As EventArgs) Handles back_btn.Click
            If WebBrowser1.CanGoBack Then
                WebBrowser1.GoBack() 'jika browser bisa mundur, maka tombol back lakukan mundur
            Else
                back_btn.Enabled = False 'jika browser tidak bisa mundur maka tombol back tidak bisa diklik
            End If
        End Sub
    
        Private Sub Forward_btn_Click(sender As Object, e As EventArgs) Handles Forward_btn.Click
            If WebBrowser1.CanGoForward Then
                WebBrowser1.GoForward() 'jika browser bisa maju, maka tombol forward lakukan maju
            Else
                Forward_btn.Enabled = False 'jika browser tidak bisa maju maka tombol forward tidak bisa diklik
            End If
        End Sub
    
        Private Sub go_btn_Click(sender As Object, e As EventArgs) Handles go_btn.Click
            WebBrowser1.Navigate(url_box.Text) 'Jika klik tombol GO maka web browser pergi kesitu
        End Sub
    
        Private Sub Refresh_btn_Click(sender As Object, e As EventArgs) Handles Refresh_btn.Click
            WebBrowser1.Refresh() 'jika klik tombol refresh maka muat ulang
        End Sub
    
        Private Sub Stop_btn_Click(sender As Object, e As EventArgs) Handles Stop_btn.Click
            WebBrowser1.Stop() 'jika klik tombol stop maka berhenti
        End Sub
    
        Private Sub WebBrowser1_Navigated(sender As Object, e As WebBrowserNavigatedEventArgs) Handles WebBrowser1.Navigated
            Stop_btn.Visible = False 'jika selesai memuat tombol stop menghilang
            Refresh_btn.Visible = True 'jjika selesai memuat tombol refresh muncul
            url_box.Text = WebBrowser1.Url.AbsoluteUri 'teks url box sama dengan alamat yang sedang dibuka web browser
        End Sub
    
        Private Sub WebBrowser1_Navigating(sender As Object, e As WebBrowserNavigatingEventArgs) Handles WebBrowser1.Navigating
            Stop_btn.Visible = True 'jika sedang memuat tombol stop muncul
            Refresh_btn.Visible = False 'jika sedang memuat tombol refresh menghilang
        End Sub
    End Class
    
    Hasil Akhir

    [​IMG]

    Nah Bagimana ? Semoga Bermanfaat dan sekian Thread saya. jika anda ingin sourcenya silahkan download di attachment :cool: Nantikan Tutorial VB.NET Selanjutnya dari saya.... :sokganteng:

    #Thread masih dalam perbaikan jadi klo masih acak acakan mohon maaf...
     

    Attached Files:

  2. marwanto.se

    marwanto.se New Member

    Joined:
    May 7, 2013
    Messages:
    7,659
    Buat web browser sendiri. :kagum:
    +Rep buat sharenya. :goodjob:
     
  3. Chrisnado

    Chrisnado Administrator Staff Member

    Joined:
    May 7, 2013
    Messages:
    1,862
    manteb om, double +Reps dehh...ini cuman bisa buka, refresh, stop, back sama foward aja ya..
     
  4. Yusril Ibnu

    Yusril Ibnu Winpoin Staff Staff Member

    Joined:
    May 12, 2014
    Messages:
    6,349
    yap :goodjob:
    Thanks Repnya.. :kagum:

    yap.., tapi nanti mau berlanjut...
    rencananya
    1. Web browser IE ini dari dasar, tab, bookmark, history, setting, themes dsbg
    2. Web browser Gecko dari dasar, tab, bookmark, history, setting, themes dsbg, juga...
    :cool:
    btw thanks bgt double repnya :kagum:
     
  5. Krisnanda Juni Antara

    Krisnanda Juni Antara General Moderating Staff Member

    Joined:
    Apr 21, 2014
    Messages:
    2,467
    wah saya mau buat ahh
    +REP buat anda :goodjob:
     
  6. Yusril Ibnu

    Yusril Ibnu Winpoin Staff Staff Member

    Joined:
    May 12, 2014
    Messages:
    6,349

    siip silahkan saja, semoga bermaanfaat... :goodjob:
    thanks +repnya
     
  7. Henwardi1

    Henwardi1 New Member

    Joined:
    Jul 14, 2014
    Messages:
    404
    btw, kamu pake Visual Studio 2013 jenis apa?
    Apa versi Express bisa melakukannya juga? :bingung:
     
  8. Yusril Ibnu

    Yusril Ibnu Winpoin Staff Staff Member

    Joined:
    May 12, 2014
    Messages:
    6,349
    semua jenis VS bisa kok... :goodjob:
     

Share This Page