Membuat Form Loading Dengan Visual Basic 6.0

Form loading ini untuk sebuah animasi saja dalam sebuah program, misalkan saat user berhasil login, maka form loading ini akan muncul sebelum ke menuju menu dari aplikasi, untuk membuat program ini buka Ms. Visual Basic 6.0 yang VB Enterprise Edition Control supaya componennya lengkap, karena kita akan menggunakan progressbar dalam membuat form loading ini, lalu pada form ubah properties dan properties komponennya sebagai berikut :

Component	Properties
Form	Border Style : Fixed Single
	Caption =””
	ControlBox = False
	StarUpPosition = Center
ProgressBar1	Min = 1
	Max = 100
	Scrolling = ccScrollingSmooth
Label1	Caption = 0, Autosize = True , Backstyle : Transparant
Timer1	Intervel = 50%

Hiasilah form tersebut menurut keinginan, karena jiwa seni masing masing kita itu berbeda beda, dan laki juga punya selera, haha, lanjut, kira kira tampilan formnya seperti ini :

Setelah itu masuk ke jendela coding dan ketikkan coding berikut :

Private Sub Timer1_Timer()

ProgressBar1.Value = ProgressBar1.Value + 1

Label1.Caption = ProgressBar1.Value + 1 & "%"

If ProgressBar1.Value = ProgressBar1.Max Then

ProgressBar1.Value = ProgressBar1.Max

Unload Me

End If

End Sub

Nah, setelah itu coba jalankan program dengan menekan tombol F5, maka akan tampil formnya sebagai berikut :

Nah jika anda sudah memiliki aplikasi sebelumnya, maka bias menambahkan form ini di awal aplikasi, untuk codingnya tinggal tambahkan form_name.show vbmodal setelah baris unload me.