Attachmate.Reflection.Objects Library (User Interface) > Size Object : Height Property |
Object.Height As Long
Sub Sample_Frame_WindowSize() Dim size As Attachmate_Reflection_Objects.size Set size = ThisFrame.WindowSize MsgBox ("The width of the InfoConnect Desktop is " & Str(size.Width) & " pixels" & " and the height is " & Str(size.Height) & " pixels") End Sub