控件的属性接口可以是数组么？

[celevantis]

比如我有一个Value属性，如何让这个属性是一个数组形式的?比如Value（0），Value（1）等等。
用控件接口向导能生成么？

[crycoming]

Public Property Get Value() As String()

End Property

[celevantis]

？
这也行？试试先

[celevantis]

Public Property Get Value() As Double()
Dim i As Integer
For i = 0 To 1
Value(i) = m_Value(i)
Next
End Property

Private Sub UserControl_InitProperties()
Dim i As Integer
For i = 0 To 1
m_Value(i) = m_def_Value(i)
Next
End Sub

Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
Dim i As Integer
For i = 0 To 1
m_Value(i) = PropBag.ReadProperty("Value()", m_def_Value(i))
Next
End Sub

Private Sub UserControl_WriteProperties(PropBag As PropertyBag)

Call PropBag.WriteProperty("Value()", m_Value(), m_def_Value())
End Sub
---------------------------------------------------------------------
这么写对么？

[celevantis]

ding~