Langsung disimak caranya, siapkan hal berikut ini :
1. Siapkan komponen tambahan seprti gambar tersebut, caranya > tekan ctrl + T >ceklist/centang Microsoft Windows Common Controls 6.0
2. Sisipkan Loading dan 1 buat timer kedalam form, hingga seperti gambar tersebut
3. Setelah itu masukan perintahnya dibawah
Private Sub Timer1_Timer()
If ProgressBar1.Value >= 100 Then
Unload Me
Form2.Show
Else
ProgressBar1.Value = ProgressBar1.Value + 10
End If
End Sub





0 comments:
Post a Comment