Güncell Konular ;

// On :4 Mart 2018 Pazar



Görünümü:

[​IMG]

SC:

Kod:
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
End Sub Private Sub tarama()
If WebBrowser1.DocumentText.Contains("input") Then
WebBrowser1.Navigate(TextBox1.Text & ListBox2.SelectedItem)
ListBox1.Items.Add(TextBox1.Text & ListBox2.SelectedItem)
ListBox2.SelectedIndex += -1 End If End Sub
ListBox2.SelectedIndex += 1
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick Try tarama() Catch ex As Exception
Timer1.Start()
Timer1.Stop() End Try End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click End Sub
End Class
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Timer1.Stop()
End Sub


İNDİR:

// 2010- B0RU70 Se☪uЯity - Hacklink Al , B0RU70 \\