主题：[求助]把SQL server 转换成access后的问题~~

转换成access后 重新更改数据源至access

Dim cmd As New SQLCommand
Dim dt As DataTable
Dim dr As DataRow
cmd.C
If UserName = ""  Then
    Messagebox.show("请选择用户!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
cmd.CommandText = "Select * From {人事档案} Where [姓名] = '" & UserName & "' and [系统开启] = 'true'"
dt = cmd.ExecuteReader

红色的部分出错  如下