This is an application for employees to schedule a conference room for meetings. There are several conference rooms; the forms allows the user to pick a conference room from a combo box, there is a list box in turn that lists the scheduled dates for that conference room. When the user clicks on a date, it populates text boxes on the side with the information of who scheduled it, when it was scheduled, etc.
My problem is displaying the employee name. I have an Employees table and a Data table. Each employee has an ID on the Employees table, the Data table stores that ID under the employee field. The ID itself is a regular Autonumber (Long integer). I've included my code; I don't understand why I keep getting type mismatch!
Private Sub lboDates_Click()
Dim lngEmployee As Long
lngEmployee = DLookup("[Employee]", "[tblData]", "[Room]='" + Me.cboRoom.Column(1) + "'") 'This DLookup works fine, returns a long with the correct Employee ID
Dim strEmployeeName As String
strEmployeeName = DLookup("[FirstName]", "[tblEmployees]", "[ID]=" + lngEmployee) 'Here is where the error occurs. I've tried adding single quotes before and after, but that still won't do anything.
MsgBox (strEmployeeName) 'This is just a test MsgBox to see if it works. I always get the error before getting to this point.