vb.net 按要求查询数据库的内容解决思路

vb.net 按要求查询数据库的内容
vs2008  window7 access2010
下面是我按书上写的一段代码：
按学号查询同学的成绩，输入学号，按下查询按钮就会出现相应的同学的成绩。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim objconn As New OleDb.OleDbConnection
        Dim objDa As New OleDb.OleDbDataAdapter
        Dim objcomm As New OleDb.OleDbCommand
        Dim objDs As New DataSet

        Dim Wherestr As String
        Wherestr = ""
        If Trim(TextBox1.Text) <> "" Then
            Wherestr = " XH  like '%" + Trim(TextBox1.Text) + "%‘"


        End If
        objconn.ConnectionString = "provider=Microsoft.ACE.OLEDB.12.0;Data Source" & "='E:\人工智能\student.accdb'"
        objcomm.CommandText = "select* FROM 基本情况"

        If Wherestr <> "" Then
            objcomm.CommandText = objcomm.CommandText & "where " & Wherestr

        End If

        objcomm.Connection = objconn
        objDa.SelectCommand = objcomm

        objconn.Open()
        objDa.Fill(objDs, "基本情况")

        objconn.Close()

        DataGridView1.DataSource = objDs.Tables("基本情况")

    End Sub
它总提示画红线的那句话form语句不正确，但是我就是照着书上面的写的为什么会提示错误，到底哪里出现问题？应该如何解决?


------解决方案--------------------
检查下 看是否这个语句执行正确

select * FROM 基本情况 ，select后面跟* 应该有空格吧！