Syntax
| Printer.CalcPicture = strPicFile
|
---|---|
Description
| Calculates the size of a picture in twips, and returns the result in X1, X2, Y1, and Y2.
You can use this property to determine whether a picture will fit on the current page or to position graphical elements with respect to the picture.
To render the pricture, use the DrawPicture method.
|
See Also
| |
Example
| Sub Main
Dim i%, s$
With Printer
'Printer object activeren:
If Not.Init() Then End
.SpaceAfter = "0.5in"
.CalcPicture = "c:\mybitmap.bmp"
debug.Print .X1, .X2, .Y1, .Y2
.Submit
End With
End Sub
|