Browser mini ini saya buat untuk mencoba meningkatkan pages view, karena secara otomatis sesuai setting waktunya, browser ini akan bekerja meski kita tidur, ditinggal kerja atau aktivitas lain. Jadi sangat gampang, tinggal aktifkan, setting waktu dan program ini akan berjalan otomatis...
Berikut scriptnya :
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
TextBox2.Text = Val(TextBox2.Text) - 1
If TextBox2.Text = 0 Then
WebBrowser1.Navigate(TextBox1.Text)
TextBox2.Text = TextBox3.Text
End If
End Sub
Cukup menambahkan beberapa komponen pada form sebagai berikut :
1. Komponen WebBrowser
2. 3 Buah Textbox (1 untuk alamat URL, 1 Untuk Monitor CountDown Timernya, 1 Untuk menentukan Lama Waktunya).
3. Timer.
Selamat mencoba...
Berikut scriptnya :
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
TextBox2.Text = Val(TextBox2.Text) - 1
If TextBox2.Text = 0 Then
WebBrowser1.Navigate(TextBox1.Text)
TextBox2.Text = TextBox3.Text
End If
End Sub
Cukup menambahkan beberapa komponen pada form sebagai berikut :
1. Komponen WebBrowser
2. 3 Buah Textbox (1 untuk alamat URL, 1 Untuk Monitor CountDown Timernya, 1 Untuk menentukan Lama Waktunya).
3. Timer.
Selamat mencoba...
Tidak ada komentar:
Posting Komentar