Membuat Loading Pada Form visual basic

Tanpa bertele-tele, berbelit-belit, dan tanpa yg lainnya saya akan menjelaskan cara membuat progress bar sederhana dengan VB6.

• Buka Visual Basic 6.0, setelah itu pilih form standar.exe
  
• Pada properties form, ganti captionnya menjadi, Progress Bar
• Kemudian, klik kanan pada bagian kosong di toolbar general dan pilih components atau melalui menu Project -> Components, seperti ini :

• Pada tab components, pilih Microsoft Windows Common Controls 6.0 (SP6), kemudian klik Apply lalu OK.
• Selanjutnya masukkan, 1 buah progress bar dan 1 buah timer, seperti ini :

• Setelah itu klik 2 kali pada Timer1
• Lalu, masukkan ini :

Private Sub Timer1_Timer()

If ProgressBar1.Value = 100 Then

ProgressBar1.Value = 0

Else

ProgressBar1.Value = Val(ProgressBar1.Value) + Val(1)

End If

End Sub

• Setelah itu, close Form1Code tersebut, dan klik lg pd timer1.
• Ganti intervalnya menjadi 100
• Kemudian coba compile dengan menekan tombol play.
• Jika berhasil tampilannya seperti ini:

Kalo bisa jalan /gak bisa jalan programnya, kasih komentar aja ke saya, ntar saya bales. Yang cm lihat2 kalo bs kasih jg comment ke saya. Makasih.

READMORE

Pasang Jam Di form Visual Basic

1.Buat 1 Timer >> Beri Nama: tmrjam Dan Interval "20"
2.Buat 1 Label >> Beri Nama: Jam
[-] Buat Caption Label : 00 : 00 : 00

Isikan code ini di tmrjam

Private Sub tmrjam_Timer()
Jam.Caption = Time
End Sub

Selamat Berkreasi

READMORE

Membuat Form Vb Menjadi Unik

Langsung Aja Ke Source nya

Private Sub Form_load()
    Do Until Me.Top <= -15000
        Me.Width = Me.Width - 300
        Me.Left = Me.Left + 150
        Me.Top = Me.Top - 50
        Me.Height = Me.Height - 150
        Me.Refresh
        DoEvents
    Loop
    Unload Me: End
End Sub

Bisa Juga DiGunakan Di Injector Pointblank

READMORE