expression.VerticalResolution
expression Required. An expression that returns a System object.
Example
This example displays the current screen resolution (for example, "1024 x 768").
horz = System.HorizontalResolution
vert = System.VerticalResolution
MsgBox "Resolution = " & horz & " x " & vert