帮忙看看DLOOKUP哪里错了

lwlhy　发表于：2016-07-28 11:41:00 　

Private Sub txtUser_AfterUpdate()
Me.txtNewPwd.value = DLookup("Password", "UserList", "用户ID=" & Me.txtUser.Column(2))
Me.txtRole = DLookup("角色ID", "角色表", "角色ID=" & Me.txtUser.Column(3))
Me.txtDepartment = DLookup("部门", "部门表", "用户ID=" & Me.txtUser.Column(4))
End Sub

点击下载此附件

Top

lwlhy 发表于：2016-07-28 11:41:53

已经修改好，正确的代码是这样的

Private Sub txtUser_AfterUpdate()

Me.txtNewPwd = DLookup("Password", "UserList", "用户ID=" & Me.txtUser.Column(0))

Me.txtRole = DLookup("角色ID", "UserList", "用户ID=" & Me.txtUser.Column(0))

Me.txtDepartment = DLookup("部门ID", "UserList", "用户ID=" & Me.txtUser.Column(0))

End Sub

Top

虽虽TV 发表于：2016-07-28 20:26:27

值得学习!

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

帮忙看看DLOOKUP哪里错了