> Saya Mau nanya , ada ngga fungsi VB untuk dapetin tanggal terakhir
di suatu bulan yah ??
Setahu saya tidak ada function untuk mencari tanggal terakhir pada
sebuah bulan, tapi dengan sedikit akal-akalan kita bisa bikin
programnya. Logikanya gini jika kita inputkan tgl 20/04/2005, maka
kita kita ambil bulan dan tahunnya, tglnya kita replace menjadi tgl
01, jadi dari tgl inputan yg semula 20/04/2005 kita ganti menjadi
01/04/2005. Nah setelah tgl tsb kita replace langkah selanjutnya
adalah tgl tsb kita tambah 1 bulan, sehingga tgl yg baru menjadi
01/05/2005. terakhir untuk mencari tgl terakhir, tgl yg sudah kita
tambah 1 bulan tsb kita kurangi 1 hari, sehingga tgl yg terakhir
menjadi 30/04/2005...selesai deh hehehehe...
Contoh coding spt ini:
Private Sub Command1_Click()
Dim mDate As Date
mDate = CDate("01" & Mid(Text1.Text, 3))
Text2.Text = Format(DateAdd("d", -1, DateAdd("M", 1,
mDate)), "dd/MM/yyyy")
End Sub
Notes :
Format tgl pada coding diatas diasumsikan tanggal/bulan/tahun, jika
anda menggunakan format tgl bln/tanggal/tahun, codingnya harus anda
modifikasi.
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Ikuti juga forum diskusi VB.net dengan
mengirim email kosong ke [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-vb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
