[nmst70]

اخواني الاعزاء
لي طلب كود صغير لو سمحتم
جمع عامود من جدول واظهار النتيجة في تكست بوكس
استخدم فيجوال نت  2008      وقاعدة بيانات اكسس 2003
ولكم الشكر

[مساعدة]

السلام عليكم

كيف قرأت البيانات؟

[tarek]

حسب طريقة الاتصال

textbox1.text = dt.Compute("Sum("column name") ", True).ToString() aaa


textbox1.text = ds.Tables("TB").Compute("Sum(tel)", "").ToString() aaa

[momiana1]

كود جمع عمود من Datagridview وإظهار ناتج الجمع في TextBox

PHP كود :

Dim Total As Double = 0
        For Each row As DataGridViewRow In DataGridView1.Rows
            Total += Val(row.Cells(رقم العمود).Value.ToString)
        Next
        TextBox1.Text = Total 


*******************
كود جمع عمود من الجدول Database وإظهار ناتج الجمع في TextBox

PHP كود :

Dim sqlString As String = _
            " SELECT SUM([Column name]) AS [Total1] " & _
            " FROM [Table name]  & ""
        Using da As New OleDbDataAdapter(sqlString, connectionstring)

            Using dt As New DataTable

                If da.Fill(dt) > 0 Then
                    TextBox1.Text = (dt.Rows(0).Item("Total1").ToString)
                End If

            End Using
        End Using