editor de Visual Basic
Ver Más instrucciones
1
Abrir el editor de Visual Basic.
2
Crear un nuevo Visual Basic . proyecto
3
Agregue la siguiente función :
Public Function URLDecode ( StringToDecode como secuencia) como secuencia
TempAns dévil como secuencia
< p> CurChr Dim As Integer
CurChr = 1
¿ Hasta CurChr - 1 = Len ( StringToDecode )
Seleccione Mediados de caso ( StringToDecode , CurChr , 1) spanish
Case "+ "
TempAns = TempAns & ""
Case "% "
TempAns = TempAns & Chr ( Val ("& h" & _
Mid ( StringToDecode , CurChr + 1 , 2 ) ))
CurChr = CurChr + 2
Case Else
TempAns = TempAns & Mid ( StringToDecode , CurChr , 1) spanish
End Select
CurChr = CurChr + 1
Loop
URLDecode = TempAns
End Function
4
Agregar código para llamar a la función URLDecode e ingrese el texto , que ya ha sido codificada por la cadena " Hola mundo ":
URLDecode MsgBox ("Hello % 20world % 21 % 20 % 3A% 2D % 29 " )
5
Guarde el archivo de proyecto de Visual Basic , haga clic en" Archivo "y luego" Guardar ".
6
Press " F5 "para ejecutar el proyecto de VB . Un cuadro de mensaje aparecerá texto codificado devolverá el texto sin codificar " ¡Hola, mundo ! "