UDT and functions

[juster21]

I am trying to get a function to work but the argument passed to it is a user defined type.
How do I create the argument which gets passed to the function?

Public Type Employee
   Name as string
   Role as string
   Salary as string
End Type

and the function is...

Public Function GetEmployeeInfo(ByRef EmpDescription as Employee) as String

How do I call the function???

 

[shg]

Sub x()
    Dim Bob As Employee
 
    Bob.Name = "Robert"
    GetEmployeeInfo Bob
End Sub
 
Public Function GetEmployeeInfo(ByRef EmpDescription As Employee) As String
    MsgBox EmpDescription.Name
End Function

 

[juster21]

wow. I had GetEmployeeInfo(Bob) and it blew up. Parentheses mean EVERYTHING!!!

 

[shg]

Them dang 'puters are so picky ...