+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] ممكن احد يقوم بشرح هذه الجملة For r = 0 To DataGridView1.Rows.Count - (/showthread.php?tid=12298)
ممكن احد يقوم بشرح هذه الجملة For r = 0 To DataGridView1.Rows.Count - - احمد عبد الحكيم - 15-05-15
بسم الله الرحمن الرحيم
السلام عليكم شباب ممكن شرح هذه الجملة
For r = 0 To DataGridView1.Rows.Count -1
RE: ممكن احد يقوم بشرح هذه الجملة For r = 0 To DataGridView1.Rows.Count - - Dr.Sherif Alazizi - 15-05-15
هذه حلقة تكرار
تعمل على عد صفوف الداتاجريد
والعد دائما يبدا بالرقم صفر
لذلك لو افترضنا ان لديك خمسة صفوف في الداتاجريد
سيكون اول صف يحمل الرقم 0 والثاني 1 والثالث 2 والرابع 3 والخامس 4
لذا كان لابد من وضع ( -1 ) في الكود
موفق ان شاء الله
RE: ممكن احد يقوم بشرح هذه الجملة For r = 0 To DataGridView1.Rows.Count - - سعود - 15-05-15
مثال يوضح الطريقة من غير مشاكل قواعد البيانات
طبعا هناك فرق بين -1 و -2
متى نستخدم -1 ؟
اذا كانت ميزة الاضافة معطلة في datagridview
اما لو مفعلة فنستخدم -2 لانه يوجد صف اضافي للاضافة وغالبا فارغ
كود :
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
d.Rows.Add("سعود", "37")
d.Rows.Add("سعد", "38")
d.Rows.Add("سعيد", "46")
d.Rows.Add("اسعد", "56")
d.Rows.Add("مسعود", "66")
d.Rows.Add("سعيدان", "77")
End Sub
Private Sub d_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles d.CellClick
If e.RowIndex = -1 Then Exit Sub
If e.ColumnIndex = 0 Then
tn.Items.Add(d.Rows(e.RowIndex).Cells(e.ColumnIndex).Value)
End If
If e.ColumnIndex = 1 Then
age.Items.Add(d.Rows(e.RowIndex).Cells(e.ColumnIndex).Value)
End If
End Sub
End Class