VB.NET顯示系統(tǒng)信息正確實現(xiàn)方法介紹
VB.NET編程語言應(yīng)用范圍比較廣泛,可以幫助開發(fā)人員實現(xiàn)各種功能。比如對文本的操作,對數(shù)據(jù)庫的操作等等。那么今天我們會了解到的則是VB.NET顯示系統(tǒng)信息的相關(guān)操作方法,希望會對大家有所幫助。#t#
VB.NET顯示系統(tǒng)信息實例說明
在本實例中,我們通過使用sysinfo控件得到有關(guān)操作系統(tǒng)的信息,屏幕和電源的信息。程序運行結(jié)果如圖97-1所示。
VB.NET顯示系統(tǒng)信息技術(shù)要點
使用SysInfo控件得到操作系統(tǒng)版本號、電源屬性
VB.NET顯示系統(tǒng)信息實現(xiàn)過程
■ 新建項目
打開Visual Studio.NET,選擇“新建項目”,在項目類型窗口中選擇“Visual Basic項目”,在模板窗口中選擇“Windows應(yīng)用程序”,在名稱域中輸入“SysInfo”,然后選擇保存路徑。單擊“確認”。
■ 添加控件
向窗體上添加十個Label控件(可以通過菜單“格式”進行排列)。
■ 設(shè)置屬性
將左面一欄的Label控件的Text屬性改為和界面一致。
■ 添加代碼
- 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
- '得到電池剩余時間,當(dāng)電池為交流電源時,
返回為-1,其他返回255- Select Case sysinfo.BatteryLifeTime
- Case -1
- Label10.Text = "未知"
- Case Else
- Label10.Text = sysinfo.BatteryLifeTime
- End Select
- End Sub
■ 運行程序
單擊菜單“調(diào)試|啟動”或單擊 圖標運行程序。
小結(jié)
sysinfo控件的所有屬性都是只讀的,因此我們只能在代碼中讀取。通過使用sysinfo控件可以幫助我們創(chuàng)建與Windows登錄程序相似的程序。即當(dāng)我們改變系統(tǒng)分辨率或?qū)⒁粋€即插即用的裝置插上或拔下時,我們的程序能夠?qū)Υ俗龀龇磻?yīng)。通過使用sysinfo控件可以得到操作系統(tǒng)信息、屏幕設(shè)置信息和電源狀態(tài)信息。其中,得到屏幕的尺寸大小不包括被Windows任務(wù)欄所占的部分。
VB.NET顯示系統(tǒng)信息的相關(guān)操作就為大家介紹到這里。