Class encriptador
[...]
'
'TXTCHARS ES UN ARRAY CON LOS CARACTERES DEL TEXTO
'TXTUBOUND ES EL NUEMRO DE ELEMENTOS DE LA MATRIZ TXTCHARS
'
'
'CUERPO DE LA ENCRIPTACION LLAMA A TODOS LOS 'METODOS QUE LA COMPONEN, HASTA 'AHORA SOLO 'OBTASCII Y LOS APLICA PARA CARACTER
'
Public Sub cifrar(ByVal txtchars() As Char, ByVal txtUbound As Integer)
For I = 0 To txtUbound
obtASCII(txtchars, UBound(txtchars))
Next
End Sub
'
'METODO QUE OBTIENE EL ASCII DE CADA CARACTER Y LO 'ENCADENA A MSASCII PARA SU POSTERIOR IMPRESION EN 'PANTALLA
'
Public Sub obtASCII(ByVal txtchars() As Char, ByVal txtUbound As Integer)
piASCII(I) = Convert.ToByte(txtchars(I))
[...]
End Sub
[...]
End class
mi duda es la sigueinte, todo esta correcto salvo porque, al depurarlo, me da error en esta linea:
piASCII(I) = Convert.ToByte(txtchars(I))
el error que me da es el siguiente:
(http://img73.imageshack.us/img73/1319/dibujo3aq.jpg)
he probado el codigo haciendo que intASCII no fuese una array sino una integer normal y funciona perfectamente...
porque al poner piASCII como un array y asignarle a su elemento "I" un valor me da error? que significa este error?
muchas gracias de antemano por cualquier ayuda ;) ;)
saludos
No mostras como declaras los array's.
Estas trabajando dentro de un Modulo, asi que tenes que declararlos con Public o Dim y no podes hacerlo implicitamente, siempre tiene que ser explicito.
es verdad, se me paso, las declare como Private, voy a probar lo que dices, y ya posteare gracias ;) ;)
saludos ;) ;)
lo cambie a public pero sigue sin funcionar, gracias de todos modos... alguna sugerencia mas? :rolleyes: :rolleyes: :rolleyes:
saludos ;) ;)
Declara
Option Explicit
[...]
Si posteas como declaraste los array's o el codigo completo talvez pueda darte una respuesta mas acertada sin tirar al azar.