soalnya yang anda lakukan itu pengecekan sesuai urutan karakter, bukan urutan
tanggal.
"20/05/2002" jelas lebih besar dari "15/05/2007" soalnya angka pertama
"20/05/2002" adalah angka "2" yang nilai ASCII-nya lebih besar dari angka "1"
(pada "15/05/2007").
kalo mau pengecekan berdasar tanggal, amannya pake format "yyyymmdd" aja,
jadi :
If format(Date,"yyyymmdd") >= "20070515" Then
MsgBox "diatas tanggal 15 Mei 2007"
Else
MsgBox "Dibawah tanggal 15 Mei 2007"
End If
Frangky <[EMAIL PROTECTED]> wrote:
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"
---------------------------------
Don't be flakey. Get Yahoo! Mail for Mobile and
always stay connected to friends.
