ช่วยหน่อยครับ ติดปัญหาตรงนี้จริงๆ เรื่องแสดงคนขาดงาน

 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim sql = "select ID, numbertest from table2 where numbertest like '" & TextBox1.Text & "'"
        adt = New OleDbDataAdapter(sql, dbconn)
        datatable = New DataTable
        adt.Fill(datatable)

        DataGridView1.DataSource = datatable

    End Sub