大家現(xiàn)在都在用VB.NET編程，現(xiàn)在我們就VB.NET顯示系統(tǒng)信息來做一個(gè)簡單的案例分析，大家看看有什么不足的地方可以提出來。實(shí)現(xiàn)過程：

#T#1.新建項(xiàng)目
打開Visual Studio.NET，選擇“新建項(xiàng)目”，在項(xiàng)目類型窗口中選擇“Visual Basic項(xiàng)目”，在模板窗口中選擇“Windows應(yīng)用程序”，在名稱域中輸入“SysInfo”，然后選擇保存路徑。單擊“確認(rèn)”。

2.添加控件
向窗體上添加十個(gè)Label控件（可以通過菜單“格式”進(jìn)行排列）。

3.設(shè)置屬性
將左面一欄的Label控件的Text屬性改為和界面一致。

4.VB.NET顯示系統(tǒng)信息添加代碼

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load  
'得到操作系統(tǒng)平臺代號，其中1表示95/98，2表示nt/2000系統(tǒng)  
Select Case sysinfo.OSPlatform  
Case 1  
Label2.Text = "Windows95/98" 
Case 2  
Label2.Text = "WindowsNT/2000" 
End Select  
'得到操作系統(tǒng)版本號  
Label4.Text = sysinfo.OSVersion & "." & sysinfo.OSBuild  
'得到桌面尺寸大小  
Label6.Text = sysinfo.WorkAreaHeight & "X" & sysinfo.WorkAreaWidth  
'得到電源狀態(tài)值，1表示交流電元，0表示電池  
Select Case sysinfo.ACStatus  
Case 1  
Label8.Text = "AC電源" 
Case 0  
Label8.Text = "電池" 
End Select  
'得到電池剩余時(shí)間，當(dāng)電池為交流電源時(shí)，返回為-1，其他返回255  
Select Case sysinfo.BatteryLifeTime  
Case -1  
Label10.Text = "未知" 
Case Else  
Label10.Text = sysinfo.BatteryLifeTime  
End Select  
End Sub 

5.VB.NET顯示系統(tǒng)信息運(yùn)行程序
單擊菜單“調(diào)試|啟動”或單擊　圖標(biāo)運(yùn)行程序。

小結(jié)
sysinfo控件的所有屬性都是只讀的，因此我們只能在代碼中讀取。通過使用sysinfo控件可以幫助我們創(chuàng)建與Windows登錄程序相似的程序。即當(dāng)我們改變系統(tǒng)分辨率或?qū)⒁粋€(gè)即插即用的裝置插上或拔下時(shí)，我們的程序能夠?qū)Υ俗龀龇磻?yīng)。通過使用sysinfo控件可以得到操作系統(tǒng)信息、屏幕設(shè)置信息和電源狀態(tài)信息。其中，得到屏幕的尺寸大小不包括被Windows任務(wù)欄所占的部分。