Visual Basic - Encriptamiento y levantar la orden para scanear

Necesito un codigo de Encriptamiento y Desencriptamiento
Y otro codigo para levantar la orden para scanear todo en Visual Basic 6

Gracias

[email protected]

Hay muchos metodos para encriptar, siempre recomiendo el método donde tu tengas todo el manejo, hacerla uno mismo, lo puedes hacer muy simple, solo una rutina donde pases el texto y caracter o caracter lo casmbias por otro, ya sea sumando o restando su ascii, al desencriptar tienes que reversar el proceso.

Gracias Marcos......y en cuanto a algun codigo para poder dar la orden que me scanee-.......

Gracias