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)