Membuat jam digital pada form
+ Seperti biasanya, aktifkan terlebih dahulu jendela Microsoft Visual Basic Editor (VBE)+ Kemudian buat sebuah UserForm (UserForm1) dan sebuah Label (Label1)
+ Langkah selanjutnya adalah memasukkan kode berikut
Dim Berhenti As Boolean
Private Sub UserForm_Activate()
Do Until Berhenti
Label1 = FormatDateTime(Time, vbShortTime)
DoEvents
Loop
End Sub
Private Sub UserForm_Terminate()
Berhenti = True
End Sub
+ Tekan F5 untuk mencoba kode macro diatasPrivate Sub UserForm_Activate()
Do Until Berhenti
Label1 = FormatDateTime(Time, vbShortTime)
DoEvents
Loop
End Sub
Private Sub UserForm_Terminate()
Berhenti = True
End Sub
Pilihan untuk mengubah format jam digital
vbShortTime tampilan jam tanpa detik (ex, 17:25)vbLongTime tampilan jam dengan detik (ex, 17:25:31)
Demikianlah tips kali ini tentang cara Menampilkan Jam Digital Di Form, tips ini bisa anda aplikasikan dengan menggunakan microsoft excel visual basic for application, jika ada kesulitan dan pertanyaan seputar microsoft excel silahkan tanyakan pada kolom komentar dibawah, terimakasih.
Download - Sampel artikel ini
Baca juga artikel yang berkatiatan dengan artikel ini
Membuat loading di userform
Text berjalan pada userform Excel
Membuat loading dengan macro
Mengatasi Error in loading dll
Follow IG Wasis Zain atau Like fanpage Excel Pro