Baje el ejemplo de hernanmdq, pero resulta que no incluye la libreria para zipear (zip32.dll), pero bueno, encontre esta pagina en la que te explican muy bien el uso de la libreria:
Manejo de Zip32.dll Cómo comprimir en ZIP con Visual Basic(podes descargar el codigo de ejemplo que incluye la zip32.dll)
Tambien, encontre esta otra que es para hacer lo contrario (descomprimir):
Manejo de UnZip32.dll Cómo descomprimir ZIPs con Visual Basic(podes descargar el codigo de ejemplo que incluye la unzip32.dll)
Créditos a: Eduardo Gonzalez
Saludos