您好,登錄后才能下訂單哦!
VB.NET中怎么顯示系統(tǒng)信息,很多新手對此不是很清楚,為了幫助大家解決這個難題,下面小編將為大家詳細(xì)講解,有這方面需求的人可以來學(xué)習(xí)下,希望你能有所收獲。
VB.NET顯示系統(tǒng)信息技術(shù)要點
使用SysInfo控件得到操作系統(tǒng)版本號、電源屬性
VB.NET顯示系統(tǒng)信息實現(xiàn)過程
■ 新建項目
打開Visual Studio.NET,選擇“新建項目”,在項目類型窗口中選擇“Visual Basic項目”,在模板窗口中選擇“Windows應(yīng)用程序”,在名稱域中輸入“SysInfo”,然后選擇保存路徑。單擊“確認(rèn)”。
■ 添加控件
向窗體上添加十個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,其他返回255Select Case sysinfo.BatteryLifeTime
Case -1
Label10.Text = "未知"
Case Else
Label10.Text = sysinfo.BatteryLifeTime
End Select
End Sub
看完上述內(nèi)容是否對您有幫助呢?如果還想對相關(guān)知識有進一步的了解或閱讀更多相關(guān)文章,請關(guān)注億速云行業(yè)資訊頻道,感謝您對億速云的支持。
免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點不代表本網(wǎng)站立場,如果涉及侵權(quán)請聯(lián)系站長郵箱:is@yisu.com進行舉報,并提供相關(guān)證據(jù),一經(jīng)查實,將立刻刪除涉嫌侵權(quán)內(nèi)容。