• Home
 · 
• Windows System Services
 · 
• To Display the Resolution of the Monitor

To Display the Resolution of the Monitor

To Display the Resolution of the Monitor

API Declarations


Dim X As Long, Y As Long



Rate To Display the Resolution of the Monitor

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

x = GetSystemMetrics(0)
y = GetSystemMetrics(1)

Msgbox "Resolutions is : " & CStr(x) & " X "  & CStr(y),vbExclamation,"Monitor"

End Sub