Question

我有一个带有（模态）登录表单的数据库，员工输入其用户名和密码。登录后，他们将看到另一个表单UserDashboard。我希望能够在UserDashboard上显示他们的名字和姓氏，但我无法弄明白该怎么做。

我在登录表单上使用DLookup从Employees表中找到员工的姓名（他们的用户名和密码也存储在其中）。然后我试图在UserDashboard上显示这些变量，但由于它是一个单独的表单，当UserDashboard加载时，变量“First”和“Last”中没有任何内容。

我可以做些什么来在UserDashboard上放置名字和姓氏吗？

登录表单中的代码：

First = DLookup("EmpFirstName", "Employees", "Username = '" & Me.txtUsername.Value & "'")
Last = DLookup("EmpLastName", "Employees", "Username = '" & Me.txtUsername.Value & "'")

UserDashboard表单的代码：

Private Sub Form_Load()

Me.txtDashboard = "User Dashboard - " & First & " " & Last

End Sub

谢谢！

Answer 1

在模块中定义表单外的变量，并将它们用作全局变量。

Public First As String
Public Last As String

访问VBA - 显示用户在其他表单上提供的信息表单

1 个答案: