Başlangıç > Kodlar > Visual Basic 6 ile basit web taratıcı yapımı

Visual Basic 6 ile basit web taratıcı yapımı

viyjul beyzik ten çok kısa olarak internettesiniz.....(not..:girdiğiniz sitelerin adresleri gözükmemektedir..yani istediğiniz sitelere girebilirsiniz...:))

Private Sub Combo1_Click()
Dim strURL As String
strURL = Combo1.Text
If WebBrowser1.Busy = False Then
WebBrowser1.Navigate strURL
Else
Beep
End If
Combo1.AddItem Combo1.Text
End Sub

Private Sub Combo1_KeyPress(KeyAscii As Integer)
Dim strURL As String
If KeyAscii = 13 Then
strURL = Combo1.Text
If WebBrowser1.Busy = False Then
WebBrowser1.Navigate strURL
Else
Beep
End If
Combo1.AddItem Combo1.Text
End If
End Sub

Private Sub commgo_Click()
Dim strURL As String
strURL = Combo1.Text
If WebBrowser1.Busy = False Then
WebBrowser1.Navigate strURL
Else
Beep
End If
Combo1.AddItem Combo1.Text
End Sub


TD Software


Reklamlar
  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: