vb@rchiv · Tipps & Tricks · Anzahl vorhandener Monitore ermitteln

Rubrik: System/Windows · Desktop/Bildschirm/Display | VB-Versionen: VB4, VB5, VB6

09.08.06

Anzahl vorhandener Monitore ermitteln Dieser Code zeigt, wie sich die Anzahl installierter Monitore ermitteln lässt.
Autor: Dieter Otter	Bewertung:	Views: 19.407
www.tools4vb.de	System: Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Nachfolgender Code zeigt, wie sich die Anzahl installierter Monitore ermitteln lässt.

' in einem Modul
Option Explicit
 
' API-Deklaration
Public Declare Function GetSystemMetrics Lib "user32" ( _
  ByVal nIndex As Long) As Long
 
Public Const SM_CMONITORS = 80

Aufrufbeispiel:

Dim nMonitors As Long
nMonitors = GetSystemMetrics(SM_CMONITORS)

Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv

Vol.6
(einschl. Beispielprojekt!)

Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
- nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten
- Symbol-Galerie mit mehr als 3.200 Icons im modernen Look
Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m.