Mr Frangki. sepertinya harus dibuat konversi ke dalam bentuk tgl yg
sesungguhnya ...
klo lihat kode yg anda tulis :
If Date >= "15/05/2007" Then _seolah-2 membandingkan tipe
date dgn tipe string
_
harusnya dirubah menjadi :
If Date >= CDate("15/05/2007") Then
MsgBox "diatas tanggal 15 Mei 2007"
Else
MsgBox "Dibawah tanggal 15 Mei 2007"
End If
----------
Robin Sembiring
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"
