Đơn giản là bạn đang thiếu phương thức Thực thi. Nó phụ thuộc vào loại kết quả bạn muốn. Nếu bạn chỉ muốn kết quả đầu tiên từ truy vấn (hàng đầu tiên và cột đầu tiên) thì hãy sử dụng sqlcmd.ExecuteScalar() .
Nếu bạn muốn có tất cả kết quả, bạn sẽ phải tải nó vào MySqlDataReader bằng phương thức sqlcmd.ExecuteReader()
Sử dụng ExecuteReader() :
Dim connect As New MySqlConnection("server=localhost; user id=root; password= ; database=ticketing_system;")
connect.Open()
Dim sqladapter As New MySqlDataAdapter
Dim sqlcmd As New MySqlCommand
Dim dr As MySqlDataReader
Dim dt As New DataTable
sqlcmd = New MySqlCommand("SELECT * complaint WHERE tran_no='" & lbltranno.Text & "'")
dr = sqlcmd.ExecuteReader()
dt.Load(dr)
'Useable datatable in dt variable...
connect.Close()
Sử dụng ExecuteScalar() :
Dim connect As New MySqlConnection("server=localhost; user id=root; password= ; database=ticketing_system;")
connect.Open()
Dim sqladapter As New MySqlDataAdapter
Dim sqlcmd As New MySqlCommand
Dim dr As String
Dim dt As New DataTable
sqlcmd = New MySqlCommand("SELECT [COLUMN NAME] complaint WHERE tran_no='" & lbltranno.Text & "'")
dr = sqlcmd.ExecuteScalar()
'dr now contains the value of [COLUMN NAME] for the first returned row.
connect.Close()
