Visual Basic - Comprimir archivos

Saludos,
Tengo una inquietud, alguien me podria ayudar con un codigo que me permita comprimir archivos utilizando visual basic, les agradesco de antemanos el apoyo gracias....

Hola. Es sencillo:

1) Tenés que utlizar la dll de compresion Zlib (ZlibTool)
2) Agregá el OCX a tu proyecto e insertalo en un formulario
3) Con este simple código lo manejas:
ZlibTool1.InputFile = RutaDelArchivoAComprimir
ZlibTool1.OutputFile = RutaDelArchivoZipACrear
ZlibTool1.Compress

Si no tenés el componente podés bajartelo de acá:
http://www.freevbcode.com/source/ZipDB.zip
(incluye un proyecto de ejemplo)

Gracias Roman,
Me ayudo bastante,ahora justo estoy tratando de comprimir una carpeta, que tiene una estructura de carpetas y archivos, convirtiendolos en un solo archivo con extencion Zip.
He heho pruebas con la libreria zip32.dll, pero solo con archivos, aun no puedo comprimir toda una carpeta completa y de gran tamaño, si tuvieras algun codigo que me ayudara, te lo agradeceria. La idea es comprimir una carpeta de gran tamaño (en Gigas, por ejemplo); pero en un solo archivo de extencion Zip.

Manuel