26-05-14, 06:37 PM
26-05-14, 11:58 PM
جرب هذا الكود
كود :
Dim SUM As Integer = 0
For i As Integer = 0 To Me.DataGridView1.Rows.Count - 1
SUM += Me.DataGridView1.Rows(i).Cells(1).Value
Next
LBLSUM.Text = SUM26-05-14, 11:59 PM
وهذا بطريقة ثانية
كود :
Dim SUM As Integer = 0
For i As Integer = 0 To Me.DataGridView1.Rows.Count - 1
SUM += Convert.ToInt32(me.DataGridView1(3,i).value)
Next
LBLSUM.Text = SUM.ToString()27-05-14, 12:30 AM
شاهد هذا الموضوع ستجد ضالتك
http://vb4arb.com/vb/thread-2385.html
و
http://vb4arb.com/vb4/showthread.php?681...-%DE%ED%E3-
f%DA%E3%E6%CF-%DD%EC-%C7%E1%CF%C7%CA%C7-%CC%D1%ED%CF&highlight=%DA%E3%E6%CF
http://vb4arb.com/vb/thread-2385.html
و
http://vb4arb.com/vb4/showthread.php?681...-%DE%ED%E3-
f%DA%E3%E6%CF-%DD%EC-%C7%E1%CF%C7%CA%C7-%CC%D1%ED%CF&highlight=%DA%E3%E6%CF
28-05-14, 02:43 AM
-
منقول
غير الرقم (1) برقم العمود المطلوب
منقول
غير الرقم (1) برقم العمود المطلوب
كود :
Me.TextBox1.Text = (From row In DataGridView1.Rows Select Val(row.Cells(1).Value)).Sum