中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

如何使用VB.NET顯示系統信息

發布時間:2021-11-03 14:28:19 來源:億速云 閱讀:228 作者:小新 欄目:編程語言

這篇文章將為大家詳細講解有關如何使用VB.NET顯示系統信息,小編覺得挺實用的,因此分享給大家做個參考,希望大家閱讀完這篇文章后可以有所收獲。

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顯示系統信息運行程序
單擊菜單“調試|啟動”或單擊 圖標運行程序。

關于“如何使用VB.NET顯示系統信息”這篇文章就分享到這里了,希望以上內容可以對大家有一定的幫助,使各位可以學到更多知識,如果覺得文章不錯,請把它分享出去讓更多的人看到。

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

沙雅县| 烟台市| 长寿区| 延津县| 南涧| 湾仔区| 杨浦区| 司法| 台江县| 和平县| 永兴县| 襄城县| 常州市| 太湖县| 江山市| 清苑县| 罗平县| 桂平市| 崇文区| 湘西| 莎车县| 兖州市| 浮山县| 故城县| 卓资县| 扬中市| 呼和浩特市| 鲁甸县| 和政县| 荃湾区| 沙田区| 清原| 水城县| 新密市| 平塘县| 中宁县| 台东县| 兴仁县| 东山县| 东乌| 萍乡市|