يک برنامه در مورد سن تولد کاربر ميخواستم

با سلام خدمت شما

من يه برنامه ميخوام که تاريخ تولد کاربر رو بصورت روز، ماه ، سال دريافت کنه و سنش رو بر حسب روز و ماه و سال نمايش بده. تاريخ هم به شمسي باشه. از تاريخ ويندوز هم استفاده نشه.

مثلا طوري باشه که اول تاريخ امروز رو از ما دريافت کنه و بعدش تاريخ تولد کاربر رو و بعد هم که سنش رو نشون بده.

ممنون ميشم اگه راهنمايي بفرماييد

سلام دوست عزیز خسته نباشی.

فکر کنم این پروژه بدردت بخوره.

فعلاً خداحافظ.

دانلود پروژه:

کد:

---

http://iranblogs.persiangig.com/VB6/VB_Sal_Mah_Rooz%28HamisheBahar%29.rar

---

خيلي متشکر.

اما فکر کنم اين برنامه يه اشکال کوچيک داشته باشه. اگه به عکس زير دقت کنيد مشاهده مي کنيد که سن و ماه رو اشتباه آورده:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

درستش تقريبا 16 سال و 11 ماه و 28 روز ميشه.

سلام دوست عزیز ببخشید یه کم دیر شد معذرت میخوام.

تمام کدهای برنامه رو پاک کن و کد زیر رو جای گزین کن ممنون خداحافط.

کد:

---

Private Sub Cmd_Run_Click()
    Txt_Sal_Javab.Text = Txt_Sal_Hal.Text - Txt_Sal.Text
    Txt_Mah_Javab.Text = Txt_Mah_Hal.Text - Txt_Mah.Text
    Txt_Rooz_Javab.Text = Txt_Rooz_Hal.Text - Txt_Rooz.Text
    If Txt_Rooz_Javab.Text < 0 Then
        Txt_Mah_Javab.Text = Txt_Mah_Javab.Text - 1
        Txt_Rooz_Javab.Text = 30 + Txt_Rooz_Javab.Text
    End If
   
    If Txt_Mah_Javab.Text < 0 Then
        Txt_Sal_Javab.Text = Txt_Sal_Javab.Text - 1
        Txt_Mah_Javab.Text = 12 + Txt_Mah_Javab.Text
    End If
End Sub

---

خيلي ممنون از شما.

عالي بود.