Red de conocimiento informático - Problemas con los teléfonos móviles - Utilice VB para crear una aplicación que pueda invertir la cadena de entrada y luego generarla

Utilice VB para crear una aplicación que pueda invertir la cadena de entrada y luego generarla

1. Utilice la función StrReverse para invertir la cadena: str=StrReverse(string1)

2 Utilice la función mid:

Private Sub Command1_Click()

. Dim a As String

a = InputBox("Ingrese una cadena de caracteres", "Enter")

For i = Len(a) To 1 Step -1

Imprimir Mid(a, i, 1);

Siguiente

Fin Sub