vba - Visual Basic 中的屏幕尺寸

Question

如何在 Visual Basic 中访问屏幕的尺寸？我在网上看了一下，它说要使用 Screen.width 和 Screen.length，但它不能识别这些属性......有什么提示吗？

Answer 1

在VB中你可以使用Screen.Width和 Screen.Height .它们不在 VBA 中，但您可以改用 API 调用。添加这些声明:

Public Declare Function GetSystemMetrics Lib "user32.dll" (ByVal index As Long) As Long
Public Const SM_CXSCREEN = 0
Public Const SM_CYSCREEN = 1

然后像这样使用:

MsgBox GetSystemMetrics(SM_CXSCREEN) & "x" & GetSystemMetrics(SM_CYSCREEN)