I'm running the FoxPro ODBC driver from Euphoria and not VB, but this should still work:
SQLCmd = "Pack CustTbl"
data = execDirectODBC(hconn,SQLCmd)
As long as the table "CustTbl" is not open by anyone else, it packs just fine.
Note, this isn't documented anywhere on the planet that I can find, I figured it out through Extreme Tinkering (tm). Too bad "zap CustTbl" doesn't work.