vb.net顯示系統信息

2024-07-10 13:01:06

字體：大中小

來源：轉載

供稿：網友

顯示系統信息
實例說明
在本實例中，我們通過使用sysinfo控件得到有關操作系統的信息，屏幕和電源的信息。程序運行結果如圖97-1所示。

技術要點
l 使用sysinfo控件

l 得到操作系統版本號、電源屬性

實現過程
■ 新建項目
打開visual studio.net，選擇“新建項目”，在項目類型窗口中選擇“visual basic項目”，在模板窗口中選擇“windows應用程序”，在名稱域中輸入“sysinfo”，然后選擇保存路徑。單擊“確認”。

■ 添加控件
向窗體上添加十個label控件（可以通過菜單“格式”進行排列）。

■ 設置屬性
將左面一欄的label控件的text屬性改為和界面一致。

■ 添加代碼
private sub form1_load(byval sender as system.object, byval e as system.eventargs) handles mybase.load

'得到操作系統平臺代號，其中1表示95/98，2表示nt/2000系統

select case sysinfo.osplatform

case 1

label2.text = "windows95/98"

case 2

label2.text = "windowsnt/2000"

end select

'得到操作系統版本號

label4.text = sysinfo.osversion & "." & sysinfo.osbuild

'得到桌面尺寸大小

label6.text = sysinfo.workareaheight & "x" & sysinfo.workareawidth

'得到電源狀態值，1表示交流電元，0表示電池

select case sysinfo.acstatus

case 1

label8.text = "ac電源"

case 0

label8.text = "電池"

end select

'得到電池剩余時間，當電池為交流電源時，返回為-1，其他返回255

select case sysinfo.batterylifetime

case -1

label10.text = "未知"

case else

label10.text = sysinfo.batterylifetime

end select

end sub

■ 運行程序
單擊菜單“調試|啟動”或單擊圖標運行程序。

小結
sysinfo控件的所有屬性都是只讀的，因此我們只能在代碼中讀取。通過使用sysinfo控件可以幫助我們創建與windows登錄程序相似的程序。即當我們改變系統分辨率或將一個即插即用的裝置插上或拔下時，我們的程序能夠對此做出反應。通過使用sysinfo控件可以得到操作系統信息、屏幕設置信息和電源狀態信息。其中，得到屏幕的尺寸大小不包括被windows任務欄所占的部分。

上一篇：在.Net中嵌入資源文件到程序集中

下一篇：VB.NET實現關機和重新啟動