Property Let

[AlexanderBB]

I can pass one variable ok, but I need to pass 2.
Doesn't seem to work.. Is there an example with 2 variables?

Public Property Let iItem (aa As String, v As Integer)
... do stuff
End Property

Dim Test as Popup
Set Test = New Popup
Test.iItem = "Fred", 9

("Fred", 9) in brackets nogo either.

 

[StephenCrump]

Can you provide more background/code on what you're trying to do.

I'm guessing that .iItem consists of item and key, but it's not clear why each instance of Popup would have only one .iItem?

 

[AlexanderBB]

No, it's isn't an item/key. I just can't pass in both variables and Google help isn't clear if I should be able to or not.

 

[StephenCrump]

Why not pass an array, e.g.

Public Property Let iItem(v As Variant)
' .....


Test.item = Array("Fred", 9)

 

[AlexanderBB]

Sure thing.. I also split a string. So one parameter is the limit. Wanted to prove that.. I found some MS stuff
that indicated other options existed but not explained well.

 

[StephenCrump]

You can write a procedure within the Popup class to accept multiple arguments, to assign to multiple properties, e.g.

Sub Test()

    Dim x As Popup
    Set x = New Popup
    
    x.SetDetails "Fred", 9
    
    MsgBox x.Name
    
End Sub

'Popup Class
Dim sName As String, lNumber As Long
Public Sub SetDetails(s As String, i As Long)
    sName = s
    lNumber = i
End Sub

Public Property Get Name() As String
    Name = sName
End Property

Public Property Get Number() As Long
    Number = lNumber
End Property