تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كتابة نص البحث في الداتاغريد فيو
#1
السلاام عليكم اخوتي أنا  أستخدم الجملة التالية لاظهار لوحة البحث الخاصة بالمواد بعد كتابة الأحرف الأولى للمادة في خانة اسم المادة في الـ DATAGRID VIEW CELL المخصصة لادخال اسم المادة المادة على اللوحة الأم لكي تظهر لوحة البحث وقد كتب في خلية البحث الموجودة عليها الأحرف الأولى التي كتبتها للتو في الـ DATAGRID VIEW على اللوحة الأم.
النتيجة التي أحصل عليها الآن هي
تفتح لوحة البحث لكن دون ظهور الاحرف الأولى في خانة البحث 
أرجو المساعدة لو سمحتم
علما أني احصل على النتيجة المرجوة لو كتبت الجملة البرمجية الواردة في الاسفل في الحدث CELL END EDITING في ال DATAGRID VIEW  بدلا من الحدث KeyUp ولكنه غير مناسب في هذا الحدث.


 
Private Sub DGV_KeyUp(sender As Object, e As KeyEventArgs) Handles DGV.KeyUp
                                                                       If e.KeyCode = Keys.Enter Then
                                                   Dim I As Integer = DGV.CurrentCell.RowIndex
                                              Dim J As Integer = DGV.CurrentCell.ColumnIndex
    
                                                                                                 If J = 2 Then
    
                                                                         Dim F As New FRM_ALL_ITEME
       
                                                  F.TXT_SEARCH.Text = DGV.Rows(I).Cells(2).Value
                                                                                               F.SHOWDIALOG()
                                                                                                     END IF                                               

                                                                                                          END SUB
الرد }}}
تم الشكر بواسطة: asemshahen5
#2
وعليكم السلام ورحمة الله وبركاته

ممكن تجرب القيمة EditedFormattedValue
بدلا من Value

الرد }}}
تم الشكر بواسطة: ghias , asemshahen5
#3
(08-12-19, 05:21 PM)محمد كريّم كتب : وعليكم السلام ورحمة الله وبركاته

ممكن تجرب القيمة EditedFormattedValue
بدلا من Value

مشكور أخي محمد لكنها لم تبدل شيء 
كأنه لايعتبر بوجود أي قيمة للخلية التي تجري الكتابة فيها بعد.
ألف شكر للرد
الرد }}}
تم الشكر بواسطة: asemshahen5
#4
ممكن السبب ان ضغط Enter بينتقل للسجل التالي اللي خلاياه بدون قيمة ؟

هذا مثال شغال عندي كما طلبت (لاحظ إنه بياخذ قيمة الصف - 1)
كود :
       If e.KeyCode = Keys.Enter Then

           Dim I As Integer = DGV.CurrentCell.RowIndex - 1
           Dim J As Integer = DGV.CurrentCell.ColumnIndex

           If J = 2 Then

               Dim F As New FRM_ALL_ITEME
               F.TXT_SEARCH.Text = DGV.Rows(I).Cells(2).Value
               F.ShowDialog()

           End If

       End If

الرد }}}
تم الشكر بواسطة: ghias , asemshahen5
#5
(08-12-19, 05:57 PM)محمد كريّم كتب : ممكن السبب ان ضغط Enter بينتقل للسجل التالي اللي خلاياه بدون قيمة ؟

هذا مثال شغال عندي كما طلبت (لاحظ إنه بياخذ قيمة الصف - 1)
كود :
       If e.KeyCode = Keys.Enter Then

           Dim I As Integer = DGV.CurrentCell.RowIndex - 1
           Dim J As Integer = DGV.CurrentCell.ColumnIndex

           If J = 2 Then

               Dim F As New FRM_ALL_ITEME
               F.TXT_SEARCH.Text = DGV.Rows(I).Cells(2).Value
               F.ShowDialog()

           End If

       End If

كلام صحيح تماما. ألف شكر أخي محمد وشكرا لتعاونك مشكور
الرد }}}
تم الشكر بواسطة: asemshahen5 , محمد كريّم



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم