快速使用VB.NET顯示系統信息
大家現在都在用VB.NET編程,現在我們就VB.NET顯示系統信息來做一個簡單的案例分析,大家看看有什么不足的地方可以提出來。實現過程:
#T#1.新建項目
打開Visual Studio.NET,選擇“新建項目”,在項目類型窗口中選擇“Visual Basic項目”,在模板窗口中選擇“Windows應用程序”,在名稱域中輸入“SysInfo”,然后選擇保存路徑。單擊“確認”。
2.添加控件
向窗體上添加十個Label控件(可以通過菜單“格式”進行排列)。
3.設置屬性
將左面一欄的Label控件的Text屬性改為和界面一致。
4.VB.NET顯示系統信息添加代碼
- 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
5.VB.NET顯示系統信息運行程序
單擊菜單“調試|啟動”或單擊 圖標運行程序。
小結
sysinfo控件的所有屬性都是只讀的,因此我們只能在代碼中讀取。通過使用sysinfo控件可以幫助我們創建與Windows登錄程序相似的程序。即當我們改變系統分辨率或將一個即插即用的裝置插上或拔下時,我們的程序能夠對此做出反應。通過使用sysinfo控件可以得到操作系統信息、屏幕設置信息和電源狀態信息。其中,得到屏幕的尺寸大小不包括被Windows任務欄所占的部分。