VB怎样增加解压缩功能

如何用VB程序解压缩zip格式的文件，只有单个文件。最好不要用第三方插件。能直接调用windows自带的功能是最好了。

各位大哥，我在线等待哟。一定要帮帮小弟啊。 --------------------编程问答-------------------- 昏，Windows自带的功能不就是第三方了吗？ --------------------编程问答-------------------- 除非你自己写压缩解压算法，否则必须用第三方的东西。
最常用的是GZip。
http://www.example-code.com/vb/vb6-gzip-file.asp --------------------编程问答-------------------- 能给个使用教程或实例吗？ --------------------编程问答-------------------- 大哥啊，VB又要怎样引用windows自带的解压缩功能呢？ --------------------编程问答-------------------- 2楼的网址里已经有实例了。
windows自带的zip解压功能是通过一个activex实现的，但是很多人（尤其是精简系统使用者）都把它删除了，使用它不具备通用性。

补充：VB ,  基础类