Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
508to512
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
508to512
508to512
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Strings verketten

Strings verketten
28.10.2004 18:03:57
weeZe
Hallo ihr wissenden,
das ist bestimmt eine einfach Frage für euch, mit der ich mich mittlerweile schon den halben tag beschäftige:
Warum funktioniert das
For i = 0 To 50
t_erg = ergarr(i) & " " & t_erg
Next i
aber das nicht:
For i = 0 To 50
t_erg = t_erg & " " & ergarr(i)
Next i
t_erg ist ein Feld mit dem Typ String und ergArr ist ein Array den ich mit der Methode Split(String) aus einem String erzeugt habe.
Vielen Dank für eure Mühe bereits im voraus!
Grüße
weeZe

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Strings verketten
Reinhard
Hi weeze,
wie wärs mit einer Fehlerbeschreibung?
Gruß
Reinhard
AW: Strings verketten
28.10.2004 18:21:25
weeZe
bei dem obigen beispiel verknüpft er die Strings wie angegeben, das ist nur leider die falsche reihenfolge.
Bei dem anderen passiert einfach nichts. Das Feld t_erg bleibt die ganze Zeit leer...
AW: Strings verketten
Reinhard
Hi weeZe,
mit
ergarr = Split("Eins Zwei Drei")
laufen bei mir beide Codes.
Als workaround. ändere doch beim ersten die Reihenfolge,
For i = 50 To 0 Step -1
Gruß
Reinhard
AW: Strings verketten
28.10.2004 18:23:07
GraFri
Hallo
So funktioniert es. Vielleicht liegt es an der deffinition des Arrays?


      
Sub StringTest()
Dim i               As Integer
Dim t_erg           As String
Dim ergarr(0 To 50) As Variant
'Daten in ergarr() einlesen
  For i = 0 To 50
    ergarr(i) = Chr(56 + i)
  
Next i
t_erg = vbNullString
  
For i = 0 To 50
    t_erg = ergarr(i) & " " & t_erg
  
Next i
MsgBox t_erg
t_erg = vbNullString
  
For i = 0 To 50
    t_erg = t_erg & " " & ergarr(i)
  
Next i
MsgBox t_erg
Mit freundlichen Grüßen, GraFri
Anzeige
AW: Strings verketten
28.10.2004 18:39:26
weeZe
Nun funktioniert es, allerdings erst nachdem ich die Deklarartion des Stringfeldes t_erg von
Dim t_erg as String * 72
auf
Dim t_erg as String
geändert habe!?
Gibt es dafür eine Erklärung?
Auf jedenfall schonmal vielen Dank für deine Mühe GraFri!!
AW: Strings verketten
28.10.2004 18:40:42
weeZE
Vielen Dank natürlich auch an Reinhard!!

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige