Converts a size from pixels to TWIPS in the current GefScreen. | |
Syntax: | object.PixelsToTwipsSize Width, Height |
Parameters: |
Width As
long* -
Height As
long* -
|
Description: | Converts a size from pixels to TWIPS in the
current GefScreen. Examples Sub ScreenSize() Dim x As Long Dim y As Long x = 640 y = 480 CimGetScreen.Zoom 100 CimGetScreen.PixelsToTwipsSize x, y MsgBox "a 640x480 pixel screen is " & x/20
& "x" & y/20 & " pts" End Sub |
See Also: | PixelsToTwipsPos , TwipsToPixelsPos , TwipsToPixelsSize |