Visual Basic - Compresión

Hola, me hace falta hacer un exe o un bat que me coja un archivo y lo comprima a zip , pero con el mimo nombre de archivo.
Es decir, si el archivo era 02042003.xxx que pase a ser 02042003.zip o cualquier otro compresor.
gracias!!

En mis tiempos habia un programita llamado pkzip, con el que le mandabas a traves de DOS, instrucciones para comprimirtelo, le podias decir en que ruta ponerlo y que nombre ponerle, y supongo que sabras grabar en archivos TXT desde VB, asi que no te sera problema crear un BAT desde VB, y llamarlo con el SHELL.