+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=23561)
البحث مع داتا قرايد فيو مهم جدا - nooralcown - 28-01-18
استعملت هذا الكود للبحث داخل داتا قرايد فيو بدون الفرز من الجداول
' Dim irowindex As Integer
'تم الاعلان عنه في القسم العام
If irowindex > (DataGridView1.Rows.Count - 1) Then
irowindex = 0
End If
Dim srch As String
srch = TextBox12.Text
DGV_units.ClearSelection()
For i As Integer = irowindex To DGV_units.Rows.Count - 1
If DGV_units.Rows(i).Cells(2).Value IsNot Nothing Then
If DGV_units.Rows(i).Cells(2).Value.ToString.ToUpper.StartsWith(srch.ToUpper) Then
DGV_units.Rows(i).Selected = True
DGV_units.RowsDefaultCellStyle.SelectionBackColor = Color.Blue
irowindex = i
DGV_units.FirstDisplayedScrollingRowIndex = (i)
Exit For
End If
End If
Next
ما أريده الان ان يبحث البرنامج عن النتيجة التالية بالضغط على نفس الزر , هل هذا ممكن , وشكرا لكم مقدما
RE: البحث مع داتا قرايد فيو مهم جدا - nooralcown - 28-01-18
لم يعمل البحث فقط لمرة واحدة
المطلوب هو عندي فهرس اصناف مثلا جوال 1 , جوال 2 , جوال 3 وهكذا
الضغط الاول سيقف على اول نتيجة وفي الضغطة الثانية التالي لها وهكذا ......
انا شفت الفكرة في برنامج معمول بلغة دلفي
RE: البحث مع داتا قرايد فيو مهم جدا - محمود صالح - 28-01-18
اولا
ضع متغير (I) في العام (اول الفورم مش في نفس BUTTON)
PHP كود :
Dim i As Integer
ضع هذا الكود في BUTTON
PHP كود :
On Error Resume Next
DGV_units.ClearSelection()
For i = i To DGV_units.Rows.Count - 1
If DGV_units.Rows(i).Cells(3).Value.ToString.Contains(TextBox12.Text) Then
DGV_units.Rows(i).Selected = True
DGV_units.FirstDisplayedScrollingRowIndex = i
Exit For
End If
Next
If Not i > DGV_units.Rows.Count - 2 Then
i += 1
Else
i = 0
End If
RE: البحث مع داتا قرايد فيو مهم جدا - nooralcown - 29-01-18
يا ريت حد يعمله مثال لانه مش زابط خالص
RE: البحث مع داتا قرايد فيو مهم جدا - محمود صالح - 29-01-18
اتفضل اخي
[attachment=16946]
RE: البحث مع داتا قرايد فيو مهم جدا - nooralcown - 29-01-18
تسلم اخي محمود صالح المثال تمام ميه ميه