Using Property Set Statement correctly

[MacDaddyNickP]

Does anyone have a good example of using a Property Set Statement correctly to a user defined class.

 

[Golom]

Usually it's just

obj.PropertyName = SomeValue

if the property is a basic data type or

Set obj.Property = SomeValue

if the property is itself an object.

[small]No! No! You're not thinking ... you're only being logical.
- Neils Bohr[/small]

 

[MajP]

Inside the class setting

Public Property Set PictureForm(theForm As Access.Form)
On Error GoTo HandleError
Set mForm = theForm
mForm.OnCurrent = "[Event Procedure]"
Exit Property
HandleError:
MsgBox Err.Number & " " & Err.Description
End Property