This Tutorial is going to teach you how to get information about your computer. Its a simple but very useful application to know and use our computer information in specified steps. For example we can get Computer Name, Username, OS Name, Memory, Screen Resolution of your system are shown given below:-
Public Sub computer_info()
MsgBox("Name of My Computer= " & My.Computer.Name)
MsgBox("Username of My Computer= " & My.User.Name)
MsgBox("Name of Operationg System of My Computer= " & My.Computer.Info.OSFullName)
MsgBox("Available Physical Memory of My Computer= " & My.Computer.Info.AvailablePhysicalMemory)
MsgBox("Avaialable Virtual Memory of My Computer= " & My.Computer.Info.AvailableVirtualMemory)
MsgBox("Total Physical Memory of My Computer= " & My.Computer.Info.TotalPhysicalMemory)
MsgBox("Total Virtual Memory of My Computer= " & My.Computer.Info.TotalVirtualMemory)
MsgBox("Caps Lock ON of My Computer= " & My.Computer.Keyboard.CapsLock)
MsgBox("Wheel exists of mouse of My Computer= " & My.Computer.Mouse.WheelExists)
MsgBox("Screen Resolution of My Computer= " & My.Computer.Screen.WorkingArea.ToString)
MsgBox("Screen Bits Per Pixel of My Computer= " & My.Computer.Screen.BitsPerPixel)
End Sub
No comments:
Post a Comment