请问 from 子句语法错误 怎么修改 啊

Question

我的语句 为什么说from 子句语法错误 我的表的名字和字段名都对啊
StrSQL1 = "select * from rsxx where 员工编号 ='" & Trim(txtnum.Text) & "'"
 If RsModEmployee.State = adStateClosed Then
        
    RsModEmployee.Open StrSQL1, DBCON, adOpenKeyset, adLockOptimistic, adCmdTable
     End If

Answer 1

就是 把它拿出来在数据库里执行看看
select * from rsxx where 员工编号 ='" & Trim(txtnum.Text) & "'"

Answer 2

StrSQL1 = "select * from rsxx where 员工编号 ='" & Trim(txtnum.Text) & "'"
 If RsModEmployee.State = adStateClosed Then
        
         RsModEmployee.Open StrSQL1, DBCON, adOpenKeyset, adLockOptimistic, adCmdTable
End If            '//修改记录集
       If Trim(txtnum.Text) <> Empty And Trim(txtname) <> Empty And Trim(txtsex.Text) <> Empty Then
          StrSQL2 = "update rsxx set "
          StrSQL2 = StrSQL2 & " 单位 = '" & Trim(txtdanwei.Text) & "'"
          StrSQL2 = StrSQL2 & " and 姓名 = '" & Trim(txtname.Text) & "'"
          StrSQL2 = StrSQL2 & "where 员工编号 = '" & Trim(txtnum.Text) & "'"          If RsModEmployee.RecordCount <> 0 Then
          
             DBCON.Execute StrSQL2, i
             If i > 0 Then
                '//更新记录集
                MsgBox "数据修改成功", , "人事信息修改"
                RsAddEmployee.Close
                           End If
          Else
             MsgBox "不存在这个编号的员工", vbExclamation, "验证失败"
             
          End If
                 
   If RsModEmployee.State = adStateOpen Then
      RsModEmployee.Close
   End If
           
           
          
     End If
     
End If

Answer 3

这儿出错了吧：
StrSQL2 = StrSQL2 & " 单位 = '" & Trim(txtdanwei.Text) & "'"
StrSQL2 = StrSQL2 & " and 姓名 = '" & Trim(txtname.Text) & "'"
有用and吗？试试","
StrSQL2 = StrSQL2 & " 单位 = '" & Trim(txtdanwei.Text) & "'"
StrSQL2 = StrSQL2 & " , 姓名 = '" & Trim(txtname.Text) & "'"