Mr Frangki itu sepertinya membandingkan tipe DATE dgn tipe STRING , jadi yachhh... :-D

If Date >= "15/05/2007" Then -------> bandingkan tipe DATE dgn tipe STRING

seharusnya :

If Date >= CDate("15/05/2007") Then -----> membandingkan tipe date dgn tipe string yg sudah di konversi date
           MsgBox "diatas tanggal 15 Mei 2007"
       Else
           MsgBox "Dibawah tanggal 15 Mei 2007"
       End If

Semoga membantu, terima kasih .

Robin'S



--------------------------------------------

Frangky 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"

Kirim email ke