aku mau sharing digital clock, biar tambah asik si ms-access seperti 
layaknya sebuat website.
aku dapat dari surfing web, nih source nya :
http://www.thescripts.com/forum/thread632963.html

Originally Posted by atiq
i am trying to create a clock with the date that i could display on a 
form? can someone help me design a basic one? any help would be 
appreciated
(posting dari atiq : saya berusaha membuat jam berdetak yang saya 
dapat munculkan pada form, adakah yang dapat menolong saya secara 
sederhana? bantuan anda saya hargai.)

For a Date and Digital Clock display on your Form:
Place a Lable Control on your Form and Name it lblClock.
Set the appropriate Properties such as Font, Font Size, Bold, Text 
Alignment, etc. for the Label.
(Untuk membuat tanggal dan jam berdetak pada form:
letakkan label pada form dengan Name lblClock, caption kosong.
ubah properties label untuk variasi huruf, warna huruf, latar 
belakang dll)

Set the Form's Timer Interval to 1000 (1 second)
Place the code listed below in the On Timer() Event of the Form
The Clock will update itself every second - see sample output below
(Setel properties Form timer interval ke 1000 yaitu 1 detik, letakkan 
kode dibawah ini pada event On Timer, event procedure)

Private Sub Form_Timer()
  'There are many variations on the Date/Time display Format
  'this is just one of them
  Me![lblClock].Caption = Format$(Now(), "dddd, mmm dd, yyyy - 
hh:mm:ss AM/PM")
End Sub

untuk variasi tanggal, jam dan detik, bisa anda ubah format nya. 
Misalkan hanya mau menampilkan hh:mm:ss saja.

Selamat mencoba, dan Ms-Access akan semakin cuantik.

cheers,
budilaks



Kirim email ke