ayuda con error de descifrar

[::: Devil :::]

hola amigos tengo un problema, el cual es este tengo un programa que cifra y descifra pero solo me da la opcion de cifrar y para descifrar necesito hacerle unas modificaciones las cuales se las hago y me da un error alguien me podria hechar una manito este es el codigo

Option Explicit
'y puede servirle cuando necesita cifrar
'una contraseña por ejemplo
'No olvide que tiene que hacer referencia a la
'libreria ...   EncrDescr.DLL   ...  desde Proyecto - Referencias -
'botón Examinar y luego la marca.
'La libreria puede estar en el directorio de C:\Windows\System
'o bien en el Path de la misma aplicacion
'una vez que su aplicacion hace referencia a la
'libreria, simplemente la llama cifrado (su_palabra) para cifrar su_palabra
'o bien descifrado (su_palabra) para descifrar su_palabra
'vea el ejemplo en el mismo codigo mas abajo



Private Sub Command1_Click()
    Dim MiPalabra
   
    'PARA cifrar LA PALABRA
    MiPalabra = cifrado(Text1.Text)
    Text2.Text = MiPalabra
   
    'si lo que quiere es descifrar algo
    'lo haria de la siguiente forma
    'obviamente tuvo que haber sido previamente
    'cifrado con la misma libreria.
   
    'PARA descifrar LA PALABRA
    'MiPalabra = descifrado(Text1.Text)
    'Text2.Text = MiPalabra
   
End Sub

Private Sub Command2_Click()
    End
End Sub

Private Sub Command3_Click()
    MsgBox "La llamada es: cifrado (palabra) o descifrado(palabra)desde su programa.", vbInformation
End Sub

Private Sub Form_Load()

End Sub

[NYlOn]

Por favor postea el codigo de la DLL, sino es dificil ayudarte...

[elmaro]

has lo que dice NYlOn ,. sino sera dificil ayudar,. pon el codigo entre las etiketas [ code] [/code ]  asi se ace mas facil de leer el codigo
y creo que con lo que postiaste ay algo que no me cierra ^o)

como sabe el programa si debe cifrar o descifrar al acr click en el command1??? deberias poner condiciones,.
a no ser que mi respuesta  este en el codigo de la dll,. bueno posteala nomas
suerte




El MaRo!