Ms access Access VB似乎无法从数据库中读取数据

我做错了什么？谢谢我想知道该员工是否是管理员

您需要正确的语法，可以是：

Set rst = CurrentDb.OpenRecordset("SELECT role" & _
        " FROM EMP " & _
        " WHERE id =" & Chr(34) & id & Chr(34))

If rst.Fields(role) = "admin" Then
    cmdConnecterPrivilege.Visible = True
Else
    cmdConnecterPrivilege.Visible = False
End If

但您可以使用一个代码行完成此简单任务：

If rst.Fields("role") = "admin"
If rst("role") = "admin"
If rst!role = "admin"

---

到底出了什么问题？你有错误吗？什么数据类型是

id

？如果不公布问题的全部细节，就很难提供帮助。VB.NET无法访问vba。ID是否为字符串值得怀疑，因此"es&may&mizz&it是的，我知道访问权限，它提供了错误/异常的详细信息。它们是什么？是什么让你觉得我除了像黄瓜一样酷之外还有别的？由于标签包含“请勿将此用于xxxx”之类的措辞，并且您没有注意到sage指南，所以我指出了这一点。标签帮助您从该领域的专家那里获得帮助；没有VB.NET答案会对您有所帮助，请尝试

rst.Fields（“角色”）.value

非常感谢！

cmdConnecterPrivilege.Visible = (Nz(DLookup("role", "EMP", "ID = '" & id & "'")) = "admin")