Thema Datum  Von Nutzer Rating
Antwort
17.08.2016 10:05:34 Yannick
NotSolved
17.08.2016 13:42:48 Gast87260
NotSolved
17.08.2016 13:57:30 Gast3788
NotSolved
17.08.2016 14:11:04 Gast49115
NotSolved
Rot Arrays über eine Schleife erstellen
17.08.2016 14:29:21 Gast1178
NotSolved
17.08.2016 14:56:47 Yannick
NotSolved

Ansicht des Beitrags:
Von:
Gast1178
Datum:
17.08.2016 14:29:21
Views:
736
Rating: Antwort:
  Ja
Thema:
Arrays über eine Schleife erstellen

hab das mal mit der Klasse gemacht (bin aber kein Klassen-Experte)

das ganze sieht dann nicht mehr ganz so aus wie ein 2-dimensionales Array.

 

die Klasse mit dem Namen clArray:

Private mWerte(2) As Long

Public Property Get Werte(ByVal Index As Integer) As Variant
Werte = mWerte(Index)
End Property

Public Property Let Werte(ByVal Index As Integer, ByVal vNewValue As Variant)
mWerte(Index) = vNewValue
End Property

im Code dann:

Dim A() As clArray

Dim Anz As Integer

Anz = 200


ReDim A(Anz) As clArray

For i = 0 To Anz
    Set A(i) = New clArray
    A(i).Werte(0) = i
    A(i).Werte(1) = i * 2
    A(i).Werte(2) = i ^ 2
    
Next i

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
17.08.2016 10:05:34 Yannick
NotSolved
17.08.2016 13:42:48 Gast87260
NotSolved
17.08.2016 13:57:30 Gast3788
NotSolved
17.08.2016 14:11:04 Gast49115
NotSolved
Rot Arrays über eine Schleife erstellen
17.08.2016 14:29:21 Gast1178
NotSolved
17.08.2016 14:56:47 Yannick
NotSolved