aLoa :D
Ein Kollege von mir hat einmal ein Verschlüsslerprogramm geschrieben und das in VB 2005. Ich hab es versucht nach C# umzuschreiben aber nicht geschafft. Ich brauch das Programm auch noch geändert also das das Programm die Strings und Zeichen mit Zahlen ersetzt sondern mit definierten Buchstaben.
Hier der Code in VB 2005:
Dim laenge As Long
Dim i As Long
Dim zeichen As String
ent.Text = LCase(ent.Text)
laenge = Len(ent.Text)
ver.Text = "-"
For i = 1 To laenge
zeichen = Mid(ent.Text, i, 1)
Select Case zeichen
Case "a"
ver.Text = ver.Text & "10"
Case "b"
ver.Text = ver.Text & "11"
u.s.w. bis z
Case Else
MsgBox("Ungültiges Zeichen an der " & i & ". stelle. (" & zeichen & ")", , "Fehler")
ver.Text = ver.Text & "00"
End Select
ent.text ist der Deutsche Text in der textbox
ver.text ist der verschlüsselte Text in der anderen Textbox
Die Ausgabe des Programms wenn ich z.b bei ent.text -> hallo:
-zahl-zahl-zahl-zahl-
Das mit den Bindestrichen und den Zeichen die einzusetzten sind kann ich selbst ersetzen, ich brauche jetzt nur das andere.
Hoffe auf schnelle Hilfe, falls etwas unklas ist pls sagen ;)
mfg Speedy
