jadi ngga ada fungsi Vb buat nyari tanggal akhir. kalo bergitu terima kasih mas Eko saya akan coba sarannya mas Eko.
Thank's Arief ----- Original Message ----- From: Eko Heri Susanto To: [email protected] Sent: Tuesday, April 19, 2005 10:05 AM Subject: [indoprog-vb] Re: Cari Tanggal Terakhir > 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 a.. To visit your group on the web, go to: http://groups.yahoo.com/group/indoprog-vb/ b.. To unsubscribe from this group, send an email to: [EMAIL PROTECTED] c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service. [Non-text portions of this message have been removed] 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/
