System.Windows.SystemParameters.PrimaryScreenWidth
System.Windows.SystemParameters.PrimaryScreenHeight Oppure la funzione Heigth My.Computer.Screen.Bounds Screen.PrimaryScreen.Bounds Bounds Is a rectangle that provides the size. Alternatively, you can look at the WorkingArea, which will Not Include the task bar And docked windows. Public Function ScreenResolution() As String Dim intX As Integer = Screen.PrimaryScreen.Bounds.Width Dim intY As Integer = Screen.PrimaryScreen.Bounds.Height Return intX & " × " & intY End Function |