Question

我的代码存在问题，因为当我点击登录表单的提交按钮时，会出现错误。

错误是“对象不包含自动化对象'tbl_tutor。'”

它显示代码的哪一部分导致错误;

[Forms]![frm_login]![Username]=[tbl_Tutor]![UserName]

这部分代码是检查表tbl_Tutor的UserName字段中的用户名，但我无法使其工作。

但我不知道如何解决这个问题。我有两个单独的表用于此登录系统，因为有一个教师和一个教师表，每个都有一个单独的登录用户名和密码，并在表格的下拉列表中选择，然后输入用户名和密码，然后表格会查找信息是否正确。我的代码可能有误，因为我在Access方面经验不足（这是我的A Level IT考试，我们还没有真正学过如何使用Access）。

完整代码如下所示;

If [Forms]![frm_login]![typeselect]="Personal Tutor" Then
 If [Forms]![frm_login]![Username]=[tbl_tutor]![UserName] Then
  If [Forms]![frm_login]![Password]=[tbl_tutor]![Password] Then
   Else MessageBox
    Message Incorrect Username or Password, please try again.
    Beep Yes
    Type None
    Title Username or Password Incorrect
  End If
 End If
End If

然后同样在教师表的下面。

非常感谢有关此问题的任何帮助：）

Answer 1

由于VBA代码是frmLogin形式，引用它的正确方法是使用控件的名称。遗漏Forms!frmLogin。

您收到错误的原因是您尝试以错误的方式访问tbl_tutor表中的值。

使用Dlookup功能访问该表。

例如：Dlookup("UserName","tbl-tutor","Username = '" & Me.UserName & "'")

使用宏访问登录系统

1 个答案: