Bildschirmauflösung ermitteln (.NET) Mit Hilfe der Screen-Klasse lässt sich die aktuelle Bildschirmauflösung und auch der verfügbare Arbeitsbereich wie folgt ermittlen.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  45.035
www.tools4vb.de	System:  WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 22 Bewertung insgesamt: gut Durchschnittliche Bewertung: 3.9 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Mit Hilfe der Screen-Klasse lässt sich die aktuelle Bildschirmauflösung und auch der verfügbare Arbeitsbereich wie folgt ermittlen.

' Bildschirmauflösung
Dim nScreenWidth As Integer
Dim nScreenHeight As Integer
 
With Screen.PrimaryScreen.Bounds
  nScreenWidth = .Width
  nScreenHeight = .Height
End With
 
MsgBox("Aktuelle Bildschirmauflösung: " & _
  nScreenWidth.ToString & " x " & nScreenHeight.ToString)

Je nach Systemeinstellung ist der tatsächliche Arbeitsbereich aber kleiner, wenn bspw. die Windows-Taskbar im Vordergrund angezeigt wird. Der tatsächliche Arbeitsbereich lässt sich wie folgt ermitteln:

' tatsächlicher Arbeitsbereich
Dim nWorkingWidth As Integer
Dim nWorkingHeight As Integer
 
With Screen.PrimaryScreen.WorkingArea
  nWorkingWidth = .Width
  nWorkingHeight = .Height
End With
 
MsgBox("tatsächlicher Arbeitsbereich: " & _
  nWorkingWidth.ToString & " x " & nWorkingHeight.ToString)