Una pequeña ayudita por favor

[Otaku=)]

Estado en un proyecto,  consiste en escribir al revez, por ejemplo

foro.elhacker = rekcahle.orof   

por favor le agradeceria mucho su ayuda,  y si postea el code, mucho mejor suerte

y Tremendo foro 

[SRVAM]

es muy facil, solo haz un bucle for para recorrer el string letra por letra desde el final, y lo almacenas en una variable string en el orden en que la vas sacando

no se si me he explicado bien del todo... si no me has comprendido te hago un ejemplo

[Otaku=)]

es muy facil, solo haz un bucle for para recorrer el string letra por letra desde el final, y lo almacenas en una variable string en el orden en que la vas sacando

no se si me he explicado bien del todo... si no me has comprendido te hago un ejemplo

jejejjeej la verda no, es que noc, mucho de visual basic apena empese hace 1 semana, es por eso si puede  hacerme una fuente  se me hace mas facil _:)

[SRVAM]

en el command1_click pones este codigo

Código (vb) [Seleccionar] Expandir



Dim x As Integer

x = Len(Text1.Text)

Do While x >= 1

Text2.Text = Text2.Text & Mid(Text1.Text, x, 1)

x = x - 1

Loop



que vaya bien

[Otaku=)]

Mucha gracia, 

La verda lo necesitaba

[jack06]

Tambien hay una funcion que hace invertir la cadena se llama StrReverse

Código (vb) [Seleccionar] Expandir


Private Sub Command1_Click()
    Dim Cadena As String
   
    Cadena = Text1.Text
   
    ' Aca invertimos el texto
    Cadena = StrReverse(Text1.Text)
   
    Text2.Text = Cadena
End Sub


Salu2

[pungados]

Es mas, todavía mas corto el código:

Código [Seleccionar] Expandir


Private Sub Command1_Click()
text2.text = StrReverse(text1.text) 
End Sub