Dim strSQL as string
Dim cmdSelect as system.data.oledb.oledbcommand

strSQL="Select * from tblUsers where UserNumber =" & TextBox1 & ";"

cmdSelect=new system.data.oledb.oledbCommand(strSQL, conn)
cmdSelect.executenonquery

This is just an example. You can use use data adapter to fill grid with the results