VB.Net Tutorial/Windows/Screen
My.Computer.Screen.Bounds
<source lang="vbnet">Option Strict On Imports System.Drawing Public Module ScreenRes
Public Sub Main() Dim bnds As Rectangle = My.ruputer.Screen.Bounds Console.WriteLine("Bounds: " & bnds.Width & " by " & bnds.Height) End Sub
End Module</source>
Bounds: 1280 by 768