Passing public property

Hi All:
I created a public property on my form3. The property I created is called lVisible. I assigned "F' to this property from Form2. Like so: Form3.lVisible = "F". Than I call form3 like so:
Load Form3
Form3.Show 1

If my form3, I have some code like so:
Private Sub Form_Activate()
If Me.lVisible = F Then
txtbxaddr2.Visible = False
End If
txtPerson.SetFocus
End Sub

The lVisible property in Form3 is null, even though I am setting the value to "F" in form. What am I doing wrong?
Thanks

Try loading it first then setting the property, then showing it.

VB Code:

Load Form3
Form3.lVisible = "F"
Form3.Show 1

TG

Still the value of lVisible is emtpy. What do I do next?

Hi:
I still need some help on setting a value on a public property.
I created a public property on form 3 the property is called lVisible.

Before I call form3 this is what I do:

Private Sub cmdaddpersoncollect_Click()
Form2.Hide
Load Form3
Form3.lVisible = "F"
Form3.txtPerson.Text = RTrim(ComboPrsTicket.Text)
Form3.Show 1
End Sub

In Form3, the lVisible is empty. What do I need to do in order to save the value I store in lVisible in Form2?

Thanks

What does the code behind your property look like?

TG

I do not have any code behind the property.

Public Property Get lVisible() As Variant

End Property

Public Property Let lVisible(ByVal vNewValue As Variant)

End Property

What code should I add behind the property?

OK,..... now the source of the problem has been exposed. You've created the property, but not told it where to hold the data.

VB Code:

dim mvarIVisible as Variant
 
Public Property Get lVisible() As Variant
  IVisible = mvarIVisible
End Property
 
Public Property Let lVisible(ByVal vNewValue As Variant)
  mvarIVisible = vNewValue
End Property

And you really should type case the property (and the related variable) to a specific type.

TG

Thank you very much that was it.