Passing data between forms

Hi all -

I'm attempting to re-write a customer database I built, using classes and I'm having troubles.

assigning the varibale to the result of a function - here is the class def
Class Module name is CEmployee

Private Pname As String
Public Property Get name() As String
    name = Pname
End Property
Public Property Let name(Value As String)
    Pname = Value
End Property

here is the Module with def, and function

Public PersonsName As String
Public emp As CEmployee
Public Function add_Name(name) As String
Set emp = New CEmployee
    emp.name = name
End Function

now the problem comes in with my two forms...
form 1 code =

Private Sub CommandButton1_Click()
    PersonsName = add_Name(TextBox1.Value)
    PersonsName = emp.name
    MsgBox PersonsName
End Sub

form 2 code =

 
Private Sub CommandButton1_Click()
    MsgBox PersonsName
End Sub

is this the only way to get the result of function. I thought personsname = add_name(textbox1.value) would be enoungh to assign the variable personsname to the result of the add_name() function

is there a better way to do this?

Your function is not returning a value.
Your code is confusing so I'm not sure what it should return.

Public Function add_Name(name) As String
Set emp = New CEmployee
    emp.name = name

   add_Name = name ' or whatever you want returned
End Function

If you are satisfied with the solution(s) provided, please mark your thread as Solved.

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save