Get/Let-Property als Array

26/01/2010 - 11:26 von Heinz-Mario Frühbeis | Report spam
Hallo!

Private mTestProp(6) As Long

Public Property Get TestProp(ByVal Index As Integer) As Long
TestProp(Index) = mTestProp(Index)
End Property

Public Property Let TestProp(ByVal Index As Integer, ByVal vNewVal As Long)
mTestProp(Index) = vNewVal
End Property

Die Let-Anweisung ist noch IO.
Die Get-Anweisung geht wieder in die Let-Anweisung und gibt immer 0 zurück.

Was ist an diesem Code falsch?


Ich hoffe, das mir jemand weiterhelfen möchte!

viele Grüße
Heinz-Mario
 

Lesen sie die antworten

#1 Thorsten Doerfler
26/01/2010 - 11:45 | Warnen spam
Heinz-Mario Frühbeis schrieb:
Private mTestProp(6) As Long

Public Property Get TestProp(ByVal Index As Integer) As Long
TestProp(Index) = mTestProp(Index)
End Property

Public Property Let TestProp(ByVal Index As Integer, ByVal vNewVal As Long)
mTestProp(Index) = vNewVal
End Property

Die Let-Anweisung ist noch IO.
Die Get-Anweisung geht wieder in die Let-Anweisung und gibt immer 0 zurück.

Was ist an diesem Code falsch?



Du verwendest nicht die automatische Rückgabevariable der Eigenschaft,
sondern machst einen neuen Aufruf der Eigenschaft. Lass die Klammern und
den Index weg:

Public Property Get TestProp(ByVal Index As Integer) As Long
TestProp = mTestProp(Index)
End Property

Thorsten Dörfler
Microsoft MVP Visual Basic

vb-hellfire visual basic faq | vb-hellfire - einfach anders
http://vb-faq.de/ | http://www.vb-hellfire.de/

Ähnliche fragen