Kalau saya, yang paling aman adalah begini kali yee...
If Format(Date, "YYYYMMDD") >= Format("15/05/2007", "YYYYMMDD") Then
MsgBox "diatas tanggal 15 Mei 2007"
Else
MsgBox "Dibawah tanggal 15 Mei 2007"
End If
----- Original Message -----
From: ::. CeniK .::
To: [email protected]
Sent: Thursday, July 05, 2007 9:06 AM
Subject: Re: [Programmer-VB] Tanya tentang Tanggal
Formatnya coba di rubah menjadi YYYYMMDD baru dicompare....
demikian,
Semoga membantu....
Rgds,
Madecenik
----- Original Message ----
From: Frangky <[EMAIL PROTECTED]>
To: [email protected]
Sent: Saturday, May 10, 2008 9:05:57 AM
Subject: [Programmer-VB] Tanya tentang Tanggal
Pakar VB yang terhormat!
Saya membuat kode seperti dibawah ini:
If Date >= "15/05/2007" Then
MsgBox "diatas tanggal 15 Mei 2007"
Else
MsgBox "Dibawah tanggal 15 Mei 2007"
End If
Yang mau saya tanyakan:
Kenapa kalau saya ubah tanggal di komputer menjadi tanggal 20 Mei 2002,lalu
saya jalankan program muncul MsgBox "diatas tanggal 15 Mei 2007". Harusnya
msgbox yang muncul adalah: MsgBox "Dibawah tanggal 15 Mei 2007". Begitupun
kalau saya ubah tanggal di komputer menjadi Tanggal 10 Mei 2008, Muncul msgbox
"Dibawah tanggal 15 Mei 2007". Harusnya muncul msgbox "diatas tanggal 15 Mei
2007"
------------------------------------------------------------------------------
Get the free Yahoo! toolbar and rest assured with the added security of
spyware protection.
