Advertisement
Guest User

Untitled

a guest
Feb 22nd, 2017
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 0.42 KB | None | 0 0
  1.     'result = True if extended, or else False
  2.         Private Function DetectIfMonitorsExtendedMode() As Boolean
  3.             Dim result As Boolean = False
  4.             Dim search As New ManagementObjectSearcher("root\CIMV2", "SELECT * FROM Win32_PnPEntity WHERE SERVICE = 'monitor'")
  5.      
  6.             If search.Get().Count >= Screen.AllScreens.Count Then result = True
  7.      
  8.             Return result
  9.         End Function
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement