I made a type "Employee" in a class module.

Option Compare Database

Option Explicit


Private Type Employee
DateHired As Date
FullName As String
IsMarried As Boolean
HourlySalary As Currency
End Type

Then I'm trying to assign a variable as this new user defined type
in a sub function.

Private Sub cmdCreate_Click()
Dim Contracter As Employee

Contracter.DateHired = #12/4/2004#
Contracter.FullName = "James McNeil"
Contracter.IsMarried = False
Contracter.HourlySalary = 10

txtDateHired = Contracter.DateHired
txtFullName = Contracter.FullName
chkIsMarried.Value = Contracter.IsMarried
txtHourlySalary = Contracter.HourlySalary


End Sub

but an error saying " method or data member not found" keeps popping up for the .datehired

any suggestions?