Visual Basic - algo curioso

El código que utilizo para compactar una base de datos es el siguiente:
Dim je As JRO.JetEngine

Set je = New JRO.JetEngine
'Crear un nombre aleatorio
sDBTmp = "DBT_" & Format(Minute(Now), "00") & Format(Second(Now), "00") & ".mdb"

'Asegurarnos de que no existe una base de datos con el nombre temporal
If Len(Dir(sDBTmp)) Then Kill sDBTmp
'Compactar la base de datos

je.CompactDatabase "Data Source=" & txtNombreBase.Text & ";", _
"Data Source=" & sDBTmp & ";"

'Eliminar la base de datos original
Kill txtNombreBase.Text

' Renombrar la base temporal con el original
Name sDBTmp As txtNombreBase.Text

La pregunta es: ¿porque despues de compactar la base de datos ocupa mas que antes?

Muchas gracias.

Esto no deberia ocurrir ... ?¡
Cuando compactas un MDB, Access remueve cualquier consulta que haya generado tablas temporales, etc.
Prueba haciendo dentro de Access y compara los tamaños de los dos procesos.

He probado a compactar con Access, el tamaño sigue siendo mayor aunque no como al ejecutar el código que llega a ser casi el doble de la base de datos.

¿Alguna idea?

Gracias de todas formas

Tambien con Access el tamaño sigue siendo mayor..? pero que extraño...?
Lo que te puedo recomendar es lo siguiente. Creas una nuevo MDB, copia los objetos que te interesan de la original y raspate la original. A lo mejor puede estra por dañarse irreparablemente.
Compacta la nueva y si tienes el mismo comportamiento pues pensaria que es tu copia de Access

Prueba y me dices

Me he creado una nueva BD y he exportado las tablas, he compactado desde Access y con el código VB y sigue haciendo lo mismo.
He probado ahora a reparar la base de datos y nada de nada.
He probado tambien con otras bases de datos y siempre hace los mismo, con el código el tamaño es casi el doble y desde access es un poco mayor.

Esto seguro que es un fenómeno paranormal.

De todas formas gracias.

Prueba compactarla en otra maquina con access...
aunque quizas este dañado el archivo en si, si probaste lo que dijo Yamil y no funciono te quedan 2:
1) Tratar de poner guardar como y luego compactar
2) Verificar que no tengas un virus de macro que hace justamente eso, actualizaa tu antivirus
3) bajate una utilidad de reparacion de .mdb; se que las hay por Inet pero no tengo ninguna como para recomendarte.

cuentanos tu experiencia
Suerte
Pedro