Hi,
Its me again. After looking far and wide, I came up with this code:
Private Sub Command2_Click()
Dim Conn As Connection
Dim rst As Recordset
Dim strSQL As String
Set Conn = Text0.Value
strSQL = "SELECT FirstName, LastName FROM Employees WHERE EmployeeID " & "' & EmployeeID & '"
rst.Open...