Help With Property Arrays
:confused: I am having some trouble with property arrays. I think I have the property get and property let procedures correct, but I can't seem to get the ReadProperties and WriteProperties right. Can someone help?
Private m_Test() As String
Public Property Get Test() As String()
Test = m_Test
End Property
Public Property Let Test(ByRef New_Test() As String)
Dim I As Integer
Redim m_Test(Ubound(New_Test,1))
For I = LBound(New_Test,1) To Ubound(New_Test,1)
Test(I) = New_Test(I)
Next I
PropertChanged "Test"
End Property