coba ini :
    txt_umurthn.Text = Int(DateDiff("m", DateValue(txt_tgllahir.Text),
Now) / 12)
    txt_umurbln.Text = DateDiff("m", DateValue(txt_tgllahir.Text),
Now) - Int(DateDiff("m", DateValue(txt_tgllahir.Text), Now) / 12) * 12



--- In [email protected], "D.N.Adam" <[EMAIL PROTECTED]> wrote:
>
> Rekan-rekan milis VB, saya perlu bantuan pencerahan mengenai masalah
> program sbb :
> Begini, bagaimana cara, kalau saya masukan tanggal lahir di
> txt_tgllahir.text di program saya ini otomatis akan mengisi umur 
> untuk txt_umurthn dan txt_umurblnÂ…? Contoh progrannya sudah saya
> posting ke milis ini namanya : Mencari Selisih Umur Tahun & Bulan.
> Untuk lebih jelas kerjanya sbb :
> Jika saya masukkan di text box umur seseorang lahir  otomatis
> txt_umurthn dan txt_umurbln terisi dengan sendirinya akan langsung
> terisi untuk menghitung langsung umur-> tahun dan umur-> bulan
> seseorang tersebut. Contoh progrannya sudah saya posting ke milis
ini
> namanya : Mencari Selisih Umur Tahun & Bulan.
> Atas bantuan teman-teman semua, terima kasih
>







Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]

Forum ini berkembang dengan pesat, jika anda memiliki
dedikasi dan waktu, silahkan mengaplikasikan diri
menjadi moderator.




SPONSORED LINKS
Computer internet security Computer internet business Computer internet access
Computer internet privacy securities Computer internet help Computer internet connection


YAHOO! GROUPS LINKS




Kirim email ke