Urusan umur biasanya membingungkan soalnya kalau dasarnya beda, hasilnya bisa beda. Contoh, kalau saya katakan setahun 360 hari & 1 bulan 30 hari, beda dengan rumus anda (16 Okt 2005 sampai 17 Nov 2006 = 1 tahun 1 bulan 1 hari). Dengan rumus anda, bagaimana mengitung 29 Feb 2004 sampai 28 Feb 2005 ? 1 tahun 0 bulan -1 hari dong ? :) Saya sih cenderung pakai rumus fix (1tahun=360hari, 1bulan=30hari). Tapi terserah anda sih, tiap kantor punya rules sendiri2. Kalau anda ingin menggunakan hasil 1tahun 1bulan 1hari seperti yg anda inginkan, gambarannya seperti ini : pisahkan hari, bulan & tahun ke variabel. masing2 dikurangi (didapat selisih hari, selisih bulan & selisih tahun). Berarti kan didapat selisih hari, bulan & tahun. Kalau ada yang minus (misal hari -5), berarti hari=hari+30 & bulan=bulan-1. Begitu juga yang bulan (kalau ada yg minus, bulan+12 & tahun-1). Atau kalau mau lebih akurat, pas hari=hari+30 dicek dulu seharusnya 30 atau 31 atau 28/29, cuma ga kebayang ribetnya :)
Kalau pakai cara 1tahun=360hari 1 bulan=30hari, lebih gampang. Tinggal kurangi tgl1 & tgl2, terus cari tahun, bulan & hari seperti ini : selisih=tgl2-tgl1 tahun=selisih/360 selisih=selisih-(tahun*360) bulan=selisih/30 selisih=selisih-(bulan*30) hari=selisih Saya hanya kasih ilustrasi aja, soalnya ga sempet coba2in code. Semoga membantu. Liung's www.apktntajd.com (Ape Kate Ente Aje Deh!) [EMAIL PROTECTED] wrote: > > Hendy Tjondro > <[EMAIL PROTECTED] To: [email protected] > <mailto:Programmer-VB%40yahoogroups.com> > oo.com> cc: > Sent by: Subject: [Programmer-VB] Cara menghitung umur > [EMAIL PROTECTED] > ogroups.com > > > 11/16/2006 07:41 > PM > Please respond to > Programmer-VB > > > > Dear All,,, > > Bagaimana cara menghitung umur yang output nya sbg berikut : > 1 tahun 1 bulan 1 hari. > > contohnya : Tgl Sekarang : 17 November 2006 > > Input ===> Tgl Lahir : 16 Oktober 2005 ( txt_tgl_lahir) > > Output ===> Umur : 1 Tahun 1 bulan 1hari (txt_umur) > > waktu itu sudah pernah di jawab sama bapak Mawardi tetapi output nya tidak > seperti yang di atas.. > > thank's All.. > > God Bless All.... > > Sponsored Link >
