[ابراهيم ايبو]

السلام عليكم ورحمة الله وبركاته
اخي الكريم 
 لجمع عمود معين  يتم عبر الفنكشن التالي :

كود :

'----------Public Function Sum VB.Net With Sql----------
   Public Function Sum_Personal1() As Integer
       Dim Query As String = "Select Sum(CV_Salary) from Personal"
       Dim a As Integer
       Dim Cmd As New SqlCommand()
       Cmd = New SqlCommand(Query, Con)
       If Con.State = ConnectionState.Open Then Con.Close()
       Con.Open()
       a = Cmd.ExecuteScalar()
       Con.Close()
       Return a
   End Function
   

ولتنفيذه اما ان تضع هذا السطر في الفورم لود ليتم الاظهار في اللايبل او في بوتون ينفذ عند الحاجة او حسب ماترغب

كود :

Label1.Text = Format(Sum_Personal(), "0.00")