I am using this code to select the record I want but I encounter an error.

Dim drsql As New OleDb("SELECT * FROM employee WHERE empno like '" TextBox1.Text "'", OleDbConnection1)
'Dim DataSet11 As New DataSet()
DataSet11.Clear()
drsql.Fill(DataSet11, "Employee")
DataGrid1.DataSource = DataSet11

Kindly correct this for me?