Zamena slova

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Interesuje me kako bi mogao da izvedem da kad otkucam u jedan text box slovo A,u drugom da mi ispise slovo Z.I tako bi za svako slovo bio jedno suprotno slovo...

Ako neko hoce,neka mi da neki code,sa kojim to mogu postici.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Evo ti teorijski pa ti pretoci to u progi (tako ces nauciti).

U niz ubaci sve karaktere. Kada u TextBox ukucas A izvuces index na kome se nalazi taj karakter A. Taj isti niz pocnes da citas od nazad (znaci da ti sada Z bude prvo i samo mu kazes da ti dohvati karakter koji se nalazi na polju gde je index 1 (koji si prethodno sacuvao citanjem polozaja karaktera A) i to je to.

Ovo mi je prvo palo na pamet. Mozes da dosta nacini to resiti.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

mozda je ovo ipak jednostavnije resenje:
Private Sub Text1_KeyPress(KeyAscii As Integer)     If KeyAscii > 64 And KeyAscii < 91 Then 'velika slova (65=A 90=Z)         Text2.Text = Chr$(90 - (KeyAscii - 65))     Else         If KeyAscii > 96 And KeyAscii < 123 Then 'mala slova (97=a 122=z)             Text2.Text = Chr$(122 - (KeyAscii - 97))         End If     End If End Sub