• Home
 · 
• Windows System Services
 · 
• Retrieve the Windows working area (i.e. the portion of the screen not obscured by the taskbar or ot

Retrieve the Windows working area (i.e. the portion of the screen not obscured by the taskbar or ot

Retrieve the Windows working area (i.e. the portion of the screen not obscured by the taskbar or other application bars).

API Declarations


Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long

Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type



Rate Retrieve the Windows working area (i.e. the portion of the screen not obscured by the taskbar or ot

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Dim typRect As RECT

' Retrieve the Windows working area (i.e. the portion of
' the screen not obscured by the taskbar or other application bars).
Call SystemParametersInfo(SPI_GETWORKAREA, vbNull, typRect, 0)
With typRect
    lngTop = .Top
    lngLeft = .Left
    lngRight = .Right
    lngBottom = .Bottom
End With