如何用VB 來壓縮 .mdb 的資料庫?(編號:3524)

在Access中, 可以用工具列上的功能來壓縮資料庫, 請問在VB 中有無函數可以壓縮 .mdb 的資料庫? 謝謝!