Well for the code posted above...techgnome mentioned in post 15... you need to add a "Get" property for the same "Let" name.....

Code:
Public Property Get UserName () as String
	UserName = Label1.Caption
End Property

Public Property Let UserName (ByVal NewVal As String)
	Label1.Caption = NewVal
End Property
' Form with UC named bob on it,,,
Code:
If Bob.UserName = "0" Then
    Bob.UserName = "1"
End If
You really should try the UC Wizard in VB!