Bilgisayarınızın ekranın çözünürlüğünü ve İşletim sisteminizin kaç bit olduğunu bulan program.

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      Dim en, boy, bit
      en = Screen.PrimaryScreen.Bounds.Width
      boy = Screen.PrimaryScreen.Bounds.Height
      bit = Screen.PrimaryScreen.BitsPerPixel
      MsgBox("Ekran Çözünürlüğü: " & en & "x" & boy & vbCrLf & "Bit:" & bit)
    End Sub
End Class