Jag håller på med att skapa en ActiveX kontroll som skall ha ett antal property. Propertyna heter Aktiv1, Aktiv2, Aktiv3 osv. Jag skulle bara vilja ha ett property som heter typ Aktiv(Index). Finns det ngn som har en bra ide på hur jag skall lösa detta i VB6? <code> Tack för svaret.Indexera ett Property
//UJSv: Indexera ett Property
Dim m_localcopy() as string
property let active(index as integer, item as string)
if index > -1 and index < 4
m_localcopy(index) = item
End if
End property
property get active(index as integer) as string
if index > -1 and index < 4
active = m_localcopy(index)
End if
End property
</code>
-- Should do the trickSv: Indexera ett Property
Jag har dock en följdfråga. Hur får jag propertyt att synas i Property fönstret? Jag skulle vilja att mitt property fungerade på samma sätt som List propertyt i en ComboBox.
//UJ