منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كيف اضع الشهر في اداة الداتا قريد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كيف اضع الشهر في اداة الداتا قريد (/showthread.php?tid=3663)

كيف اضع الشهر في اداة الداتا قريد - aftfm - 18-08-14

السلام عليكم ورحمة الله و بركاته

كيف اضع الاشهر في العمود الثاني من الأداة داتا قريد

بحيث يكون لدي عدد 2 من اداة DateTimePicker1 و DateTimePicker2

عند اختيار الشهر 1 من الاداة DateTimePicker1 والشهر 5 من الاداة DateTimePicker2
يتم وضع البيانات
1
2
3
4
5
في العمود الثاني من القريد

وهكذا حسب الاختيار من الاداة DateTimePicker1

RE: كيف اضع الشهر في اداة الداتا قريد - أبوبكر سويدان - 19-08-14

السلام عليكم

الأفضل إرفاق البرنامج كي تُفهم المشكلة ويسهل الحل.

RE: كيف اضع الشهر في اداة الداتا قريد - العزابي - 19-08-14

طيب انا عندي طريقة اسرع ماادري بتعجبك أو لا

وهي وضع التاريخ مباشرة في الخلية . أسرع من وجهة نظري

كود :
'وضع التاريخ في خلية القردفيو
    Private Sub DataGridView1_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick
        Try
            ' التحقق من أن المستخدم ضغط علي الخلية المطلوب إضافة تاريخ بها وهي الخلية رقم 4 كمثال
            If e.ColumnIndex = 4 Then
                '  Me.DataGridView1.Rows(e.RowIndex).Cells(4).Value = Now.ToString("yyyy/MM/dd")
                Me.DataGridView1.Rows(e.RowIndex).Cells(4).Value = DateAndTime.Now.ToString("yyyy/MM/dd")
                ' Me.DataGridView1.Rows(e.RowIndex).Cells(4).Value = Now.ToShortDateString
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message, "أعد الإدخال", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
    End Sub

تحياتي