Preview DWG file using voloview in application

[Anonymous]

I have added the following code to one of the forms in my Access drawing
database.

Private Sub Form_Load()
Forms![Tekeningenserver]![VOLLEDIGPAD].SetFocus
VVPreview.src = Forms![Tekeningenserver]![VOLLEDIGPAD].Text
VVPreview.Appearance = 1
VVPreview.ZoomExtents
VVPreview.BackgroundColor = "#000000"
VVPreview.EnableUIMode = "DisableFileOpen,DisableMarkupMenu"
End Sub

This piece of code works. The form Tekeningenserver contains the information
from the titleblock. Field Volledigpad contains the full path to the
drawing.
When I open the form I get a preview of the file just the way I want it.

So far for the introduction.

My problem is printing this preview.
When I try to print the file using the following settings
Print what Extents
Paper size... A4 Landscape
Reduce enlarge.. Fit to paper

I get a print that in stead of covering the full page I get a print about
half as big as A4 (9,8cm x 13,7cm instead of 21cm x 29,7cm).

Can anybody tell me how to modify the code so that the preview prints
correctly. Preferebly using a single command click.

EJK

For my valid email adress, change the obvious.