getdevicecaps函数的第二个参数的值是多少?

时间:2013-05-07 07:29:47

标签: excel vba excel-vba excel-2007 excel-2010

我正在尝试获取活动打印机的物理边距。但我不知道我应该为GetDeviceCaps函数提供第二个参数的值。有人能告诉我 HORZSIZE VERTSIZE 的值是多少,我可以设置得到实际的打印机值。

如果我使用0作为第二个参数的值,我将getX和getY值设为1024.有人可以帮助我。

注意: DefaultPrinterInfo是用户定义的函数,用于获取drivername和printername

Sub GetDevCaps()
    Dim str() As String
    Dim hdc As Long, delHdc As Long
    Dim getX As Long, getY As Long
    str = DefaultPrinterInfo
    hdc = CreateDC(str(1), str(0), 0, 0)
    getX = GetDeviceCaps(hdc, ?)
    getY = GetDeviceCaps(hdc, ?)
    delHdc = DeleteDC(hdc)<br>
End Sub

1 个答案:

答案 0 :(得分:2)

第二个参数表示您要检索的信息。您可以在MSDN文章中找到常量和解释。

您一直要求的常数:

Global Const HORZSIZE = 4
Global Const VERTSIZE = 6