PC-Name:
My.Computer.Name

Aktueller User:
username = Split(Split(My.User.Name, "\")(1), )(0)
Zum ausgeben wird die Variable "username" benötigt.

Administrator-Rechte(Fragt ab ob der User Admin-Rechte hat):
My.User.IsAuthenticated

Betriebssystem:
System.Environment.OSVersion.ToString

System-Verzeichnis:
System.Environment.SystemDirectory

Gibt an vor wieviele Milisekunden der PC gestartet wurde:
System.Environment.TickCount

Physikalischer Speicher - insgesamt(KB):
My.Computer.Info.TotalPhysicalMemory

Virtueller Speicher - insgesamt(KB):
My.Computer.Info.TotalVirtualMemory

Zeigt an, ob der PC momentan zugang zum Internet hat:
My.Computer.Network.IsAvailable

Text in der Zwichenablage:
My.Computer.Clipboard.GetText

Anzahl der verfügbaren Prozessoren am PC:
System.Environment.ProcessorCount

CapsLock aktiviert. Gibt an, ob der CapsLock aktiviert ist:
My.Computer.Keyboard.CapsLock

NumLock aktiviert. Gibt an, ob der NumLock aktiviert ist:
My.Computer.Keyboard.NumLock

Anwendunsdaten Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.ApplicationData)

Bilder Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.MyPictures)

Desktop Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.Desktop)

Eigene Dateien Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.MyDocuments)

Musik Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.MyMusic)

Programme Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.ProgramFiles)

System-32 Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.System)

Startup Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.Startup)

Startmenü Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.StartMenu)

Verlauf Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.History)

Verknüpfungen Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.Recent)

Vorlagen Pfad:
System.Environment.GetFolderPath(System.Environmen t.SpecialFolder.Templates)