Hey
With this you can get information about your computer like CPU, BIOS, OS, and some other things.
First open Registry Database:
XP: Open start and click run, type "regedit.exe" and hit enter
Vista: click start and write "regedit" and then click it when it comes up
Then navigate here:
Code:
HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System
Then you will see BIOS, CentralProcessor and some others. Im going to demonstarte how to find out which CPU you have. Open Notepad and copy this code in:
Code:
Dim cpu As String = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "ProcessorNameString", Nothing)
You see "...\CentralProcessor\0" The 0 is the processor number. For example my CPU is a quadcore so i got 0,1,2 and 3 (because of the 4 physical cores) but just use 0.
Open up your app and under Form1_Load (or whatever form your start form is) write this:
Code:
Dim cpu As String = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "ProcessorNameString", Nothing)
Now create a label then go back to Form1_Load and type:
label1.text = cpu
Thats actually all. You can also create one more saying cpu speed or something.
For that just write like:
Code:
Dim cpuspeed As String = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "~MHz", Nothing)
Just make sure to use another "Dim *NAME*" for each instance and then change the path to whatever you like. You can also get BIOS information by using:
Code:
Dim BIOS As String = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\BIOS", "BIOSVersion", Nothing)
For OS:
Code:
Label3.Text = My.Computer.Info.OSVersion
Well thats it. You can change the reg path to whatever you like to get information 
Happy Coding