Fethi Polat 1
Fethi Polat
noisiv 1
noisiv
Manwe Work 1
Manwe Work
Scarlet 1
Scarlet
xranzei 1
xranzei
Hikaye Ekle

Bir Browser Yapalım

  • Konuyu başlatan Konuyu başlatan ßyMesMes
  • Başlangıç tarihi Başlangıç tarihi
  • Cevaplar Cevaplar 6
  • Görüntüleme Görüntüleme 584

HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!

Basic.net kullanarak bir browser yapalım bu dersimizde.

Evet arkadaşlar, şimdi bir browser yapıcağız. Bunun için formumuzda kullanacağımız araçlarımız:

1-StatusStrip
2-ToolStrip
3-Timer
4-WebBrowser
5-StatusStrip üzerine (1 tane ToolStripStatusLabel, 1 tane ToolStripProgressBar)
6-ToolStrip üzerine (1 tane ToolStripLabel, 1 tane ToolStripTextBox, 1 tane ToolStripButton)

nesnelerini ekliyoruz ve kodlarımız yazmaya başlıyoruz.

ToolStripButton1_Click

Kod:
 ToolStripProgressBar1.Value = 0
        Timer1.Start()
        WebBrowser1.Navigate(ToolStripTextBox1.Text)

Form1_Load

Kod:
ToolStripStatusLabel1.Text = "Form Yüklendi"
        Timer1.Stop()

Timer1_Tick

Kod:
 ToolStripProgressBar1.Value = ToolStripProgressBar1.Value + 10
        ToolStripStatusLabel1.Text = ToolStripTextBox1.Text + " Sayfa Yükleniyor"
        If ToolStripProgressBar1.Value = 100 Then
            ToolStripProgressBar1.Value = 0
        End If

WebBrowser1_DocumentCompleted

Kod:
Timer1.Stop()
        ToolStripStatusLabel1.Text = ToolStripTextBox1.Text + " Sayfa Yüklendi"

İsterseniz daha da geliştirebilirsiniz. Kolay gelsin. ;)
 

Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)

Geri
Üst