Размеры экрана в Visual Basic

Как получить доступ к размерам экрана в Visual Basic? Я посмотрел онлайн,и он говорит, чтобы использовать экран.ширина и экран.длина, но она не распознает эти свойства... есть советы?

7
screen-size vba

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)
11