jajajaja modifica tu pregunta por que te van a venir a regañar por venir a pedir que te hagan la tarea jajajaja mejor baja los libros posteados en el foro y ponte a estudiar jiji

XD.... (Estuve viendo tus comentarios en los posts que has hecho...)...

Al parecer no eres de los que se preocupan por hacer las cosas bien...., Pero bueno, a mi me da igual lo que hagas y/o quieras hacer... -.-

Sobre el programa, es más fácil que causarle un orgasmo a una mujer... ¬¬, de hecho, es más fácil que ver pornografía, Jejeje...

Piensalo de la siguiente Manera:

Si quieres simplemente encriptar, en cambio no quieres comprimir, puedes hacer lo siguiente:

Procesa el Archivo por Bytes, y a cada byte lo multiplicas, es decir.

Supongamos que tenemos el Byte número 1 <= Este Byte lo duplicamos y ahora tendremos dos bytes.

Un ejemplo, más sencillo, supongamos que tenemos un archivo que pesa 5 Bytes (Un archivo muy pequeño)..

La estructura en Bytes del Archivo sería de la Siguiente Manera:

Byte1
Byte2
Byte3
Byte4
Byte5

Bien, entonces, ese archivo lo abres de forma Binaria (De alguna forma con Visual Basic, busca algo sobre Archivos Binarios con Visual Basic, o algo por el Estilo... )

Bien, entonces, vamos a ir pasando los Bytes al Buffer, y vamos a leér de Byte en Byte.

Al principio, nos toparemos con el Primer Byte (Byte1), lo que tenemos que hacer, es duplicar ese Byte, es decir, hacer otro Byte Igual, y agregar estos dos bytes a un nuevo archivo (con el mismo nombre que el original), Ahora, ya tenemos dos Bytes guardados en el Archivo, de los cuales, sólo un nos interesa, que es el primero, ya que el segundo ese sólo una copia del primero.

Ahora, con el segundo Byte, hacemos lo mismo: Lo copiamos, y guardamos esos dos Bytes en el archivo previamente creado, y ya tenemos Cuatro Bytes, de los Cuales sólo dos nos Interesan, el primero y el tercero, o el segundo y el cuarto, da igual.

De ésta manera, susesivamente vamos a hacerle, hasta que terminemos con los Bytes del Archivo, y tengamos el otro archivo creado, que será el que está encriptado, sin embargo, pesa el Doble, Jeje...

Para desencriptarlo, lo que puedes hacer, es, BrirA de maFor ariaBin, e ir andocont daca dos Bytes, y de oses dos bytes le amosquit 1y lo gamosagre a un nuevo archivo, el cual se convertirá en el original, y así vas randoagar los dos Bytes ntessiguie del Archivo encriptado, ndoqutia 1 y colocando el que sobra en el Archivo que resutará..

(No pensaba darte todo el Algorítmo, pero me quedó chido, Jaja... (Desencripta la explicación sobre cómo desencriptar archivos... )

Saludos!, y piensale...

Hay otra forma más simple, pero es muy chafa...

O usa el sistema de dezplazamiento, osea, cada caracter en el archivo tiene un valor asccii como por ejemplo la "A" tiene su correspondiente valor el cual es el "65" obtienes cada caracter y hases un desplazamiento sumandole un valor fijo, como por ejemplo 1 entonces tendras que el valor codificado es "B" y si tu mensaje es
HOLA
sera codificado
"IPMB"
y listo encriptado, tambien ten cuidado que si te encuentras con un valor de 255 lo cambies por un 0 ya que no hay dezplazamiento normal, y te probocaria un error en el programa, al decodificarlo haces el proceso inverso. Asi o mas sencilla la codificacion, ahora que si quieres una codificacion mas compleja entonces hay algoritmos para eso, y la mayoria estan implementados en los archivos Zip o gzip. Suerte y a codificar...

naaaaaa ya hay librerias en vb que te hacen todo el desman y ademas no te pidieron el sistema de encriptacion, solamente que encriptara archivos, buscate en las librerias de vb y esto lo hace solito y no te lleva mas de 4 lineas de codigo

muchas gracias a todos!!