pues seguramente aqui no encontraras a muchos que puedan explicar a alguien que habla otro lenguage (php), pero pro lo pronto pues te digo vamos a lo basico:
- todo lo que aparesca despues de la comilla simple ( ' ) es un comentario en vb
- Dim es para declarar una variable, despues del nombre de la variable sigue le asigna un tipo de datos con "as" integer, string, boolean, etc, etc. creo que en php no hace falta solo se pone el signo $antesdelavariable.
supongo que sabes que son los parámetros de una función y como hacer una asignación
- Redim se usa para redimencionar una matriz o arreglo o array, que por cierto no se declara por lo menos en el código que pasaste, aunque no es necesario, amenos que uses Option Explicit esta debe declararse con dim arreglo ( numerox) as integer, string, bolean, etc, etc. esto en php no es necesario pero como aqui sabemos de vb pues....
bueno viendo mas a fondo tu función ya vi que es lo que pretende
lo que hace es encriptar o desencriptar una cadena de texto segun el parametro Action, almacenando el valor ascii de cada caracter que se encuentre en la variable text que entra como paramentro.
aver si me explico bien
--------
UserKey =
"IRONMAN"
n = Len(UserKey)
ReDim UserKeyASCIIS(1
To n)
For i = 1
To n
UserKeyASCIIS(i) =
Asc(
Mid$(UserKey, i, 1))
Next
-------
fijate que primero se asigna a la variable
UserKey la palabra "IRONMAN"
despues
a n se le asigna la longitud de la variable UserKey usando
Len en este caso "IRONMAN" tiene 7 letras asi que n = 7 despues
se redimenciona UserKeyASCIIS ( ) con la cantidad de lugares en n ya que en el siclo for se va a combertir cada una de los caracteres en la variable UserKey en un valor ascii con
Asc(Mid$(UserKey, i, 1)) y este va a ir a su correspondiente posicion (
i ) en el arreglo
UserKeyASCIIS(N) que por cierto un valor ascii es un valor numerico seguramente ya sabes eso bueno alomejor ya te enrede mucho.
por el momento sera bueno que comprendas esto espero retroalimentacion para seguir ayudando.