coba gunakan code berikut ini:
Dim tgl As Date
tgl = DateAdd("d", 4, Now)
MsgBox Format(tgl, "dd/MM/yyyy")
Mudah2an itu yg anda maksud
Salam,
Agus Pradikta
--- In [email protected], "abdul ghofur" <[EMAIL PROTECTED]>
wrote:
>
> bagaimana cara menghitung sebuah tanggal, misal sekarang tanggal 28
Mei 2008 bagaimana cara menghitung tanggal 4 hari lagi (yang hasilnya
1 Juni 2008).
>
> aku sudah coba script ini :
>
> dim tanggal as date
> di durasi as integer
> tanggal = format(now,"dd/mm/yyyy")
> durasi = 4
> peminjaman = tanggal + durasi
>
> tapi hasilnya kacau. Mohon petunjuknya
>
