منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - اخواني كيف أقوم بتحديد واختيار ( selection ) الصفوف التي بناء على القيمة في textbox2

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

اخواني كيف أقوم بتحديد واختيار ( selection ) الصفوف التي بناء على القيمة في textbox2.text بحيث لوكان عندي أكثر من صف فإنها تحدد جميعا وليس صف واحد فقط وقد قمت يعمل الكود التالي وهو يقوم بتحديد جميع الصفوف التي تحتوي على القيمة الموجودة في textbox2 ولكن يوجد عندي بعض المشاكل وهي مثلا عندما ابحث عن الصف الذي يحتوي على القيمة 22 فإنه لايحدد الصفوف ولكن عندما ابحث مثلا عن القيم 26 فإنه يعود ويحدد الصفوف التي تحتوي على 22 يعني متأخر بخطوة والله تجننت ومش عارف السبب لي ثلاثة أيام في هذه المشكلة

وهذا هو الكود المستخدم

لكم جزيل الشكر

دمتم بود

Dim intCount2 As Integer

Dim intCell2 As Integer

DataGridView9.Rows(intCount2).Selected = False

For Each myRow As DataGridViewRow In DataGridView9.Rows

For Each myCell In myRow.Cells

For intCell2 = 1 To DataGridView9.Rows.Count - 1

'Do the search in myCell

If DataGridView9.Rows(intCount2).Cells(1).Value = TextBox2.Text Then

DataGridView9.Rows(intCount2).Selected = True

''Exit For

End If

وعليك السلام ورحمة الله وبركاته
اخوي انا جربت الكود طبعا بعد التعديل ولم تواجهني المشكلة التي عندك
وبصراحة يجب ان ترفق الكود الذي تستخدمه والحدث الذي ينطلق منه تنفيذ الكود بالاضافة الى ارفاق ملف قاعدة بيانات مصغرة للتي عندك
لان عدم التطابق في الكثير من الاشياء تجعل من الصعب اعطائك جواب صحيح ودقيق

عموما انا عدلت الكود وهو يعمل معي بشكل ممتاز واقترح عليك تجربه وتخبرني بالنتيجة

كود :

 Dim intCount2 As Integer

    Dim intCell2 As Integer

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

        If intCount2 > 0 Then

            intCount2 = 0

        End If

        DataGridView1.MultiSelect = False

        DataGridView1.Rows(intCount2).Selected = True

        DataGridView1.Rows(intCount2).Selected = False

        DataGridView1.MultiSelect = True

        For Each myRow As DataGridViewRow In DataGridView1.Rows

            For Each myCell As DataGridViewCell In myRow.Cells

                Try

                    If myCell.Value.ToString = TextBox2.Text Then

                        DataGridView1.Rows(intCount2).Selected = True

                    End If

                Catch ex As Exception

                End Try

                intCell2 += 1

            Next

            intCount2 += 1

        Next

    End Sub

ألف ألف شكر لك أخي ومرة أخرى الف الف شكر لك لسرعة ردك وكرم أخلاقك الكود يعمل 100 / 100 بارك الله فيك

لك جزيل الشكر

دمت بود

السلام عليكم ورحمة الله وبركاته
أخي كيف يحصل إظهار لقيم الصف الذي يحصل له عملية اختيار ( selection ) في التكست بوكس
يعني لما اضغط يدويا تظهر قيم Row في التكست بوكس ( طبعا تكست بوك آخر غير textboox2 ) ولكن لما يحصل اختيار بالكود فإنها لا تظهر

لك جزيل الشكر
دمت بود

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

جيولوجي مبتدئ

معاند الحظ

جيولوجي مبتدئ

جيولوجي مبتدئ