As you know in (Windows OS > Disk Defragment) there is a button with name of (Analyze)

Is in (VB6 > ADO) an option like this:

True (the database needs to compact and repair)

False (the database doesn't need compact and repair)