ZIP and UNZIP through VB code

geez mate, have you heard of the feature called SEARCH ??
Use it, it makes our lives a lot easier so we dont have to answer questions like this that have been answered 50 times before.
It took me 30 seconds to find 3 example pieces of code to do what you want by using the SEARCH this board has. Now how long has it taken for you to get an answer already??
I wish more people would use the SEARCH before they post questions that have been answered a million times here already.