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

نسخة كاملة : كيف اعمل حلقه تكراريه للداتا جريد فيو
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كيف اعمل حلقه تكراريه للداتا جريد فيو واخذ القيمه الي في الخانه+القيمه في الخانه الثانيه حت يخلص ويضع المجموع في التيكسن بوكس

 For i As Integer = 0 To DataGridView1.Rows.Count() - 1 Step +1

                DataGridView1.Rows(i).Cells(1).Value += TextBox1.Text

            Next
لم ينجح معي هاذا الكود
PHP كود :
Private Sub GetSUMofUnits()
 
   Dim total As Integer

    For Each row 
As DataGridViewRow In DataGridView1.Rows
        If row
.Cells(3).Value 0
            total 
+= row.Cells(3).Value
        End 
If
 
   Next
    txtTotalUnits
.Text total
End Sub 
لم يزبط لا يفعل اي شيئ

اضع الكود بلبتون

شكرا لك اخي الكود زبط ممكن تشرح لي هاي For Each row As DataGridViewRow In DataGridView1.Rows

ما الفرق بيتهم 0 To DataGridView1.Rows.Count() - 1 Step +1

For Each row As DataGridViewRow In DataGridView1.Rows هل هذي بتوخذ قيمه الخانه تلقائي اما الكود الاول لا يوخذ القيمه ؟؟

هلا اخي ممكن اخر سوال هل اخذ القيمه الي بلتكست بوكس "نص" بلداتا جريد فيو وافحص عن طريق حلقه تكراريه اذا كان موجود النص بداتا جريد فيو بفورم ثاني اذا اوخذ بيناتو واحطها كلها بتيكست بوكيس

هلا اخي ممكن اخر سوال هل اخذ القيمه الي بلتكست بوكس "نص" بلداتا جريد فيو وافحص عن طريق حلقه تكراريه اذا كان موجود النص بداتا جريد فيو بفورم ثاني اذا اوخذ بيناتو واحطها كلها بتيكست بوكيس

كل خانه بتيكست بوكس هل يوجد امكانيه ؟؟

شرح عن طريق الكود
Dim total As Integer
Dim pos As String = BindingContext(dt).Position
For Each row As DataGridViewRow In DataGridView1.Rows
If row.Cells(3).Value = TextBox1.text And from5.DataGridView1 = from4.TextBox1.text Then

TextBox1.Text = dt.Rows(pos).Item(1)
TextBox2.Text = dt.Rows(pos).Item(2)

End If
Next
اريد كود شغال
شرح عن طريق الكود
Dim total As Integer
Dim pos As String = BindingContext(dt).Position
For Each row As DataGridViewRow In DataGridView1.Rows
If row.Cells(3).Value = TextBox1.text And from5.DataGridView1 = from4.TextBox1.text Then

TextBox1.Text = dt.Rows(pos).Item(1)
TextBox2.Text = dt.Rows(pos).Item(2)

End If
Next
اريد كود شغال
ما الذي تريد تحقيقة انا اكيد ان هناك طريقة اسهل و اسرع للبرنامج لمعلجتها 

اشرح لي ما الذي نريد انت تحققة
عند الضغط على سطر ال row داتا جريد فيو يفحص اذا كان الاسم موجود بجدول ثاني (داتا جريد فيو قاني) فيضهر بياناتة الي بلجدول الثاني يحطهن بتيكست بوكس او يضهر فورم ثانيه ويحطهن بداتا جريد فيو ثاني
(02-10-19, 03:55 PM)mostafa12 كتب : [ -> ]عند الضغط على سطر ال row داتا جريد فيو  يفحص اذا كان الاسم موجود بجدول ثاني (داتا جريد فيو قاني) فيضهر بياناتة الي بلجدول الثاني يحطهن بتيكست بوكس او يضهر فورم ثانيه ويحطهن بداتا جريد فيو ثاني

الجدول الثاني هي بيانات في جريد فيو و هذه البيانات في قاعدة البيانات مخزنة ؟؟

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