23 Oct 2015
21:15
Visual Basic

Didalam Visual Basic, kita bisa menggunakan sebuah perintah untuk memanggil form lain dari suatu form. Misalnya terdapat 2 form yaitu form1 dan form2, secara default form1 yang pertama muncul. Kemudian ingin membuat fungsi untuk memunculkan form2 dari form1, bisa dilakukan dengan tombol maupun saat form1 terbuka.
Mari kita coba buat aplikasi sederhana untuk memanggil form lain, siapkan komponen-komponen yang harus ada di bawah ini
- 1 Timer
- 1 ProgressBar
- 1 Button
- 1 Label
Tambah komponen di atas ke dalam form pada project visual basic Anda dan atur tata letak sesuai keinginan. Contohnya seperti pada gambar berikut :

Ubah pengaturan Timer
pada Properties menjadi :
Enabled |
False |
Interval |
100 |
Klik 2x pada Button1
sehingga muncul form codenya, kemudian masukkan kode berikut :
Timer1.Start()
Sehingga fungsi dari button menjadi seperti ini :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Timer1.Start()
End Sub
Lalu klik 2x pada Timer1
, ubah agar menjadi :
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If ProgressBar1.Value < ProgressBar1.Maximum Then
'Jika Value dari progressbar belum mencapai value maximum
'Maka jalankan perintah ini
Label1.Text = "Loading ..." 'Text dari Label1 Diubah
ProgressBar1.Increment(+1) 'Value dari progress bar terus ditambah
ElseIf ProgressBar1.Value = ProgressBar1.Maximum Then
'Jika Value dari progressbar telah mencapai value maximum
'Maka jalankan perintah ini
Label1.Text = "Loading Selesai" 'Text dari Label1 Diubah
Timer1.Stop() 'Timer1 dihentikan agar tidak berulang lagi
End If
End Sub
Sekarang coba test aplikasinya dengan debugging, klik tombol nya untuk memluai progressbar agar berjalan. Saya sudah menyediakan contoh Source Codenya yang dapat diunduh gratis dibawah ini.