Mit VBS best. Zeichen aus einer Variable ausschneiden und in eine neue speichern

geschlossengelöstFrage VB for Applications Entwicklung

Folgendes Problem:

Ich habe eine Variable mit dem Inhalt "2005_12_25_01" die ich aufteilen möchte, um sie am Ende als "25.12.2005" in eine neue Variable zu speichern.
Wie kann ich das machen, dass ich z.B. die Zeichen 1 bis 4, 6 bis 7 und 9 bis 10 in eigene Variablen speichern kann?

Bin für jeden Tipp dankbar!

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 23147

Url: https://administrator.de/forum/mit-vbs-best-zeichen-aus-einer-variable-ausschneiden-und-in-eine-neue-speichern-23147.html

Ausgedruckt am: 15.05.2025 um 13:05 Uhr

5 Kommentare

Neuester Kommentar

Moin seeerg,

kopier Dir die folgenden Zeilen in Dein Projekt, dann erkennst Du das Prinzip.

Dim m, n, o, p As String
m = "2005_12_25_01"
p = Left(m, 4)
o = Mid(m, 6, 2)
p = Right(m, 2)
Debug.Print "m: " & m & " |n: " & n & "|o: " & o & "|p: " & p

Gruß Biber
[Edit nach gemini's Posting]
Gut, ein bisschen konkreter auf die Frage bezogen könnte ich es auch versuchen...*gg
StrDate="2005_12_25_01"
StrYear=Left(StrDate,4)
StrMonth=Mid(StrDate,6,2)
StrDay=Mid(StrDate,7,2)
StrDateGerman= StrDay & "." & StrMonth & "." & StrYear
' Ergebnis "25.12.2005"
[/Edit]

... eine andere Möglichkeit:

strDate = "2005_12_25_01"
arrDate = Split(strDate,"_")

Das Array hat jetzt 4 Felder, die du wie Variablen verwenden kannst
arrDate(3) = 01
arrDate(2) = 25
arrDate(1) = 12
arrDate(0) = 2005

gemini

Gut, ein bisschen konkreter auf die Frage bezogen könnte ich es auch versuchen...*gg

Yep, Biber, weil halt auch der Script Host mit der Variablentypisierung nicht soviel anfangen kann.
... und beim debug.print wirft es ihn dann komplett aus der Bahn

Gruß
gemini

PS: Is glaub ich das erste Mal, dass ich weniger Zeilen habe als du

...uuups, gemini,

hast natürlich recht.
Ich war gedanklich total bei Access/VBA-Projekten statt bei VBS. *kopfschüttel*

Außerdem habe ich nebenbei telefoniert *rausred....

@22980
Konzentrier Dich auf die Lösung im zweiten Beitrag..
Ich habe hier die Antwort auf eine noch gar nicht gestellte Frage gegeben.

..so was..*immer noch kopfschüttelt*...