Red de conocimiento informático - Problemas con los teléfonos móviles - Ingrese una cadena en vb y el orden de cada carácter en el diccionario de cadenas aumentará en 1. Cómo lograr esto. Por ejemplo, ingrese abc y emita bcd

Ingrese una cadena en vb y el orden de cada carácter en el diccionario de cadenas aumentará en 1. Cómo lograr esto. Por ejemplo, ingrese abc y emita bcd

Private Sub Command1_Click()

atenuar a, b como cadena

a=inputbox("cadena de entrada")

Para i = 1 a Len(a)

b=b amp;chr(asc(mid(a,i,1)) 1)

Para i = 1 a Len(a )

b=b amp chr(asc(mid(a,i,1))) 1)

msgbox b