none
Verschlüsselung 2 RRS feed

  • Frage

  •  

    Hallo Leute!!

    Ich bin gerade dabei eine Verschlüsselungsmaschiene zu bauen habe aber ein Problem. Eigentlich sollte das prog z.b aus allen eingegebenen A´s ein k machen das würe jetzt im Quellcode so aus sehen.

     

    Code Snippet

    Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    RichTextBox1.Text = RichTextBox1.Text.Replace("A", "K")

    RichTextBox1.Text = RichTextBox1.Text.Replace("a", "K")

    RichTextBox1.Text = RichTextBox1.Text.Replace("B", "L")

    RichTextBox1.Text = RichTextBox1.Text.Replace("b", "L")

    RichTextBox1.Text = RichTextBox1.Text.Replace("C", "M")

    RichTextBox1.Text = RichTextBox1.Text.Replace("c", "M")

    RichTextBox1.Text = RichTextBox1.Text.Replace("D", "N")

    RichTextBox1.Text = RichTextBox1.Text.Replace("d", "N")

    RichTextBox1.Text = RichTextBox1.Text.Replace("E", "O")

    RichTextBox1.Text = RichTextBox1.Text.Replace("e", "O")

    RichTextBox1.Text = RichTextBox1.Text.Replace("F", "P")

    RichTextBox1.Text = RichTextBox1.Text.Replace("f", "P")

    RichTextBox1.Text = RichTextBox1.Text.Replace("G", "Q")

    RichTextBox1.Text = RichTextBox1.Text.Replace("g", "Q")

    RichTextBox1.Text = RichTextBox1.Text.Replace("H", "R")

    RichTextBox1.Text = RichTextBox1.Text.Replace("h", "R")

    RichTextBox1.Text = RichTextBox1.Text.Replace("I", "S")

    RichTextBox1.Text = RichTextBox1.Text.Replace("i", "S")

    RichTextBox1.Text = RichTextBox1.Text.Replace("J", "T")

    RichTextBox1.Text = RichTextBox1.Text.Replace("j", "T")

    RichTextBox1.Text = RichTextBox1.Text.Replace("K", "U")

    RichTextBox1.Text = RichTextBox1.Text.Replace("k", "U")

    RichTextBox1.Text = RichTextBox1.Text.Replace("L", "V")

    RichTextBox1.Text = RichTextBox1.Text.Replace("l", "V")

    RichTextBox1.Text = RichTextBox1.Text.Replace("M", "W")

    RichTextBox1.Text = RichTextBox1.Text.Replace("m", "W")

    RichTextBox1.Text = RichTextBox1.Text.Replace("N", "X")

    RichTextBox1.Text = RichTextBox1.Text.Replace("n", "X")

    RichTextBox1.Text = RichTextBox1.Text.Replace("O", "Y")

    RichTextBox1.Text = RichTextBox1.Text.Replace("o", "Y")

    RichTextBox1.Text = RichTextBox1.Text.Replace("P", "Z")

    RichTextBox1.Text = RichTextBox1.Text.Replace("p", "Z")

    RichTextBox1.Text = RichTextBox1.Text.Replace("Q", "A")

    RichTextBox1.Text = RichTextBox1.Text.Replace("q", "A")

    RichTextBox1.Text = RichTextBox1.Text.Replace("R", "B")

    RichTextBox1.Text = RichTextBox1.Text.Replace("r", "B")

    RichTextBox1.Text = RichTextBox1.Text.Replace("S", "C")

    RichTextBox1.Text = RichTextBox1.Text.Replace("s", "C")

    RichTextBox1.Text = RichTextBox1.Text.Replace("T", "D")

    RichTextBox1.Text = RichTextBox1.Text.Replace("t", "D")

    RichTextBox1.Text = RichTextBox1.Text.Replace("U", "E")

    RichTextBox1.Text = RichTextBox1.Text.Replace("u", "E")

    RichTextBox1.Text = RichTextBox1.Text.Replace("V", "F")

    RichTextBox1.Text = RichTextBox1.Text.Replace("v", "F")

    RichTextBox1.Text = RichTextBox1.Text.Replace("W", "G")

    RichTextBox1.Text = RichTextBox1.Text.Replace("w", "G")

    RichTextBox1.Text = RichTextBox1.Text.Replace("X", "H")

    RichTextBox1.Text = RichTextBox1.Text.Replace("x", "H")

    RichTextBox1.Text = RichTextBox1.Text.Replace("Y", "I")

    RichTextBox1.Text = RichTextBox1.Text.Replace("y", "I")

    RichTextBox1.Text = RichTextBox1.Text.Replace("Z", "J")

    RichTextBox1.Text = RichTextBox1.Text.Replace("z", "J")

     

    End Sub

    End Class

     

     

    Aber wenn ich jetzt zum Beispiel Hallo umwandeln will kommt "BEFFI" raus!! Ich binn jetzt schon seit 1 Stunde am überlegen aber ich finde keine Antwort! Könnt ihr mir helfen?

    ichr könnt ja mal den Quellqode in ein neues Project einfügen mit nem Button1. Da könn t ihr es euch selber mal angucken!!!

     

     

    Danke schonmal im vorraus!

     

    Sonntag, 27. Januar 2008 19:52

Antworten

  • Das ganze funktioniert nicht weil du z. b. Aus A ein K machst. Später werden aber aus den K's Us gemacht. Aus den Us werden am ebde E's. Ich weis ja nicht ob das beabsichtigt ist, dass du schon etwas geändertes wieder und wieder änderst.
    Dienstag, 29. Januar 2008 17:54

Alle Antworten

  • Das ganze funktioniert nicht weil du z. b. Aus A ein K machst. Später werden aber aus den K's Us gemacht. Aus den Us werden am ebde E's. Ich weis ja nicht ob das beabsichtigt ist, dass du schon etwas geändertes wieder und wieder änderst.
    Dienstag, 29. Januar 2008 17:54
  • Naja eigentlich sollte das nicht sein aber wie kann ich das verhindern?

    Hast du da eine Ahnung oder geht das gar net?

     

     

    Danke schonmal im vorraus=)!

    Samstag, 2. Februar 2008 22:04
  • Naja ich glaube das hatte ich schon mal in einem anderen Thread gesagt, dass ich das ganze mit einer Schleife machen würde und nicht mir StringReplace. Der Vorteil der schleife ist, dass immer nur ein Zeichen ersetzt werden würde und diese Ersetzung auch Endgültig wäre.

    Dein System so zu ändern, dass nichts mehrfach verändert wird dürfte recht schwer sein.

    Sonntag, 3. Februar 2008 07:38
  •  

    S_A_S Ich kann nur über dich staunen! So schell und genau wie du immer Antwortest=)

     

    DANKE!!!

     

    mfg. bigGermanBomber

    Sonntag, 3. Februar 2008 16:11
  •  

    warum benutzt Du nicht einen char[20] oder einen String?

    Und dann richTextbox1.Text = ...

    Das ist doch viel weniger Code. Du kannst dieselbe Variable immer neu laden.

     

    mfg

    marcus.gonschior@t-online.de

     

     

    Mittwoch, 27. Februar 2008 16:12