Ввод результата из SQL-запроса в метку

Question

У меня есть метка lblHours, как я могу поместить результат из инструкции SQL ниже в эту метку?

Dim SqlQuery1 As String = "SELECT SUM(Hours) FROM TimeSheet WHERE StaffID='" & 
    cbStaffID.Text & "' AND TimeSheetMonth='" & cbMonth.Text & "'" 

Answer 1

Пример

Dim con As SqlConnection = "your Connection String" 
    Dim cmd As SqlCommand 
    Dim query As String = "SELECT SUM(Hours) FROM TimeSheet WHERE StaffID='" & 
cbStaffID.Text & "' AND TimeSheetMonth='" & cbMonth.Text & "'" 
    cmd = New SqlCommand(query, con) 
    Try 
    con.open 
     Dim myreader As SqlDataReader = cmd.ExecuteReader() 
     If myreader.Read() Then 
      yourlable.text = myreader.GetValue(0) 

     End If 
     myreader.Close() 
    Catch ex As System.Exception 
     MsgBox(ex.Message) 
    End Try 
    con.Close() 

Answer 2

Есть несколько различных способов, вы можете идти об этом.

В этой статье Microsoft показывает, как подключиться к Access БД с помощью OLEDB ...

http://support.microsoft.com/kb/821765

Это один из способов это сделать. Существуют и другие способы подключения к базе данных Access; вам нужно сделать некоторые исследования по основам.