Also ich bin mir nicht sicher, was du konkret machen willst, aber wenns nur um das ersetzen gewisser Zeichen mit anderen geht ....
Erstelle dir 2 String-Arrays
Dim arr1(20) as String
Dim arr2(20) as String
(für 20 Einträge ... 0 - 19 = Index)
... dann schreibst du einfach in das eine die deutsche Notation:
arr1(0) = "was auch immer"
und ins andere die Übersetzung:
arr2(0) = "what ever"
, aber immer an der gleichen Position.
das nächste dann
arr1(1) = ....
arr2(1) = ... usw.
Dann einfach im Programm die Texte durchgehen und immer vergleichen, und wenns passt dann ersetzen wenn gefunden an der Stelle arr1(x) mit dem String im arr2(x) ... und das wars.
Das ganze halt in eine sinnvolle for oder while Schleife einbauen.
ok!
Falls du es noch genauer haben willst, dann sag's einfach.
XL
____________________________________
give all that you can,
and you\'ll get more than
you need!
\"XL\"
|