[saoud2]

عزيزي

هذا تعديل للكود 

كود :

Dim con As New SqlClient.SqlConnection(constring)
con.Open()
'
Dim strsq2 As String = "SELECT SUM(T3) FROM (SELECT T1, T3 FROM Table1 GROUP BY T1)"
Dim Cmd2 As New SqlClient.SqlCommand(strsq2, con)
TextBox1.Text = Cmd2.ExecuteScalar
con.Close()