---

Hallo Forum,

kennt sich jemand mit der Funktion array.add aus. Ich bringe mein Bsp. leider nicht zum laufen

Dim uno As String
Dim duo As String
Dim tres As String
uno = "Peter"
duo = "4711"
tres = "spanien"
Dim oArraySUB
oArraySUB = Array(uno)
oArraySUB = Add.Array(duo)

ich möchte eigentlich nur meine Werte uno/duo/tres nacheinander ins Array nehmen.

Gruß

Norbert

------------------
V5R18
Catia + Smarteam

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

kannst du das Problem etwas konkretisieren? Also willst du auf dem Array Item 1 (also oArraySUB(1)) die Strings einfach anhängen oder willst du das Array einfach erweitern? Wenn ja muss das Array dynamisch erweitert werden?

Code:

---

Dim M1, M2, M3
Dim oArray()

M1 = "Das"
M2 = "ist"
M3 = "schön"

Redim oArray(2)

oArray(0) = M1
oArray(1) = M2
oArray(2) = M3

---

Anmerkung: Wenn du mit VBA arbeitet dann nehme doch eine Collection her. Hier gibt es die Methode .add.

------------------
MFG Daniel

Systeminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch mehr Normteile...)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Daniel,

ich lese in einer rekursiven Schleife einige Part Nummern aus.
Diese Werte würde ich gerne ans Array dazuaddieren um es später z.B. in einer Message Box auszugeben.

Gruß

Norbert

------------------
V5R18
Catia + Smarteam

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Servus
Du könntest auch eine Klasse "Vector" (siehe zB hier) einbinden um einfach mit Arrays zu arbeiten (mit add, get_element und ggf noch sortieren einbauen)

Gruß
Bernd

PS: Hier hatte ich schon mal so eine Klasse eingebaut (Collection in VB).

------------------
Warum einfach, wenn es auch kompliziert geht.

[Diese Nachricht wurde von bgrittmann am 13. Aug. 2010 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP