منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : استفسار عن فكرة برمجية
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله
الفكرة هي : لما اقوم باختيار تاريخ الميلاد للطالب يتم كتابة عمره تلقائيا في خانة TextBox
وشكرا لكم مقدما
(25-02-20, 01:11 PM)imam_boune كتب : [ -> ]السلام عليكم ورحمة الله
الفكرة هي : لما اقوم باختيار تاريخ الميلاد للطالب يتم كتابة عمره تلقائيا في خانة TextBox
وشكرا لكم مقدما

كود :
TextBox1.Text = CInt((Today - DateTimePicker1.Value.Date).TotalDays / 365)

كود :
TextBox1.Text = Today.Year - DateTimePicker1.Value.Year
(25-02-20, 01:11 PM)imam_boune كتب : [ -> ]السلام عليكم ورحمة الله
الفكرة هي : لما اقوم باختيار تاريخ الميلاد للطالب يتم كتابة عمره تلقائيا في خانة TextBox
وشكرا لكم مقدما

جزاكم الله خيرا
تم الامر بنجاح
وعليكم السلام ورحمة الله وبركاته
هذا المثال البسيط لحساب العمر بالضبط
اتمنى ان يكون ذو فائده
Private Sub datetimepiker1_KeyUp(sender As Object, e As KeyEventArgs) Handles AgeTextBox.KeyUp
        If e.KeyCode = Keys.Enter Then
            
            AgeTextBox.Text = DateTime.Now.Year - Date_de_naissanceDateTimePicker.Value.Year


        End If
    End Sub

اخي الفاضل جرب هذا الكود و بالتوفيق
شكرا جزاكم الله خيرا