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)