Dear Joni,
 
pindah koding kamu ke bagian
 
Private Sub Form_Activate()
    .........
    .........
End Sub
 
atau buat di timer aja,
Form_Load
Timer.enabled = true
 
trus di Timer,
Jalankan Koding hitung tanggal, setelah itu timer.enabled = false
 
 
semoga itu yg ada maksud
 
regards,
Yulianto

Joni Oktora <[EMAIL PROTECTED]> wrote:
Buat rekan smua,

Aku ada troubel nih, aku mau melakukan penghitungan
secara otomatis jarak  antara tgl1 sampai tgl2 (tapi
secara otomatis), kalo lewat command sih bisa. Seperti
co/ codedibawah ini :
==========awal===============
Private Sub Command1_Click()
lab_hasil.Caption = CDate(Format(lab_tgl1.Caption,
"mm/dd/yyyy")) - CDate(Format(tgl2.caption,
"mm/dd/yyyy"))
End Sub
==========akhir==============

Tapi aku pinginnya begitu program diaktifkan proses
penghitungan otomatis dijalankan, tanpa harus mengklik
command1 misalnya. Gimana ya ?

salam
Joni

Send instant messages to your online friends http://uk.messenger.yahoo.com


Yahoo! Photos – Showcase holiday pictures in hardcover
Photo Books. You design it and we’ll bind it!

Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer




YAHOO! GROUPS LINKS




Kirim email ke