成人免费xxxxx在线视频软件_久久精品久久久_亚洲国产精品久久久_天天色天天色_亚洲人成一区_欧美一级欧美三级在线观看

VB.NET顯示系統(tǒng)信息正確實現(xiàn)方法介紹

開發(fā) 后端
VB.NET顯示系統(tǒng)信息的實現(xiàn)主要就是通過使用SysInfo控件來幫助我們得到操作系統(tǒng)的版本號以及電源屬性等。實現(xiàn)過程會在文中具體給出。

VB.NET編程語言應用范圍比較廣泛,可以幫助開發(fā)人員實現(xiàn)各種功能。比如對文本的操作,對數(shù)據(jù)庫的操作等等。那么今天我們會了解到的則是VB.NET顯示系統(tǒng)信息的相關操作方法,希望會對大家有所幫助。#t#

VB.NET顯示系統(tǒng)信息實例說明

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

VB.NET顯示系統(tǒng)信息技術要點

使用SysInfo控件得到操作系統(tǒng)版本號、電源屬性

VB.NET顯示系統(tǒng)信息實現(xiàn)過程

■ 新建項目

打開Visual Studio.NET,選擇“新建項目”,在項目類型窗口中選擇“Visual Basic項目”,在模板窗口中選擇“Windows應用程序”,在名稱域中輸入“SysInfo”,然后選擇保存路徑。單擊“確認”。

■ 添加控件

向窗體上添加十個Label控件(可以通過菜單“格式”進行排列)。

■ 設置屬性

將左面一欄的Label控件的Text屬性改為和界面一致。

■ 添加代碼

  1. Private Sub Form1_Load(ByVal 
    sender As System.Object, ByVal 
    e As System.EventArgs) Handles 
    MyBase.Load  
  2. '得到操作系統(tǒng)平臺代號,其中1表示95/98
    ,2表示nt/2000系統(tǒng)  
  3. Select Case sysinfo.OSPlatform  
  4. Case 1  
  5. Label2.Text = "Windows95/98" 
  6. Case 2  
  7. Label2.Text = "WindowsNT/2000" 
  8. End Select  
  9. '得到操作系統(tǒng)版本號  
  10. Label4.Text = sysinfo.OSVersion & 
    "." & sysinfo.OSBuild  
  11. '得到桌面尺寸大小  
  12. Label6.Text = sysinfo.WorkAreaHeight 
    & "X" & sysinfo.WorkAreaWidth  
  13. '得到電源狀態(tài)值,1表示交流電元,0表示電池  
  14. Select Case sysinfo.ACStatus  
  15. Case 1  
  16. Label8.Text = "AC電源" 
  17. Case 0  
  18. Label8.Text = "電池" 
  19. End Select  
  20. '得到電池剩余時間,當電池為交流電源時,
    返回為-1,其他返回255  
  21. Select Case sysinfo.BatteryLifeTime  
  22. Case -1  
  23. Label10.Text = "未知" 
  24. Case Else  
  25. Label10.Text = sysinfo.BatteryLifeTime  
  26. End Select  
  27. End Sub 

■ 運行程序

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

小結

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

VB.NET顯示系統(tǒng)信息的相關操作就為大家介紹到這里。

責任編輯:曹凱 來源: 中國IT實驗室
相關推薦

2010-01-22 13:08:50

VB.NET創(chuàng)建數(shù)組

2010-01-15 16:03:48

VB.NET重載Win

2010-01-20 17:47:54

VB.NET注釋

2009-11-02 15:49:23

VB.NET顯示系統(tǒng)信

2010-01-15 18:12:28

VB.NET超鏈接

2010-01-15 19:17:23

2010-01-15 10:56:50

VB.NET繼承實現(xiàn)多

2010-01-07 16:51:56

VB.NET窗體鉤子

2010-01-22 10:41:33

VB.NET聲明結構

2009-11-10 12:42:47

VB.NET Prin

2010-01-07 15:25:11

VB.NET數(shù)組

2010-01-15 15:26:46

VB.NET自定義類型

2010-01-12 10:40:58

VB.NET數(shù)據(jù)庫壓縮

2010-01-21 13:34:56

VB.NET刪除文件夾

2010-01-08 13:35:35

VB.NET寫Log方

2010-01-21 17:58:40

VB.NET List

2010-03-04 11:12:02

Python AOP

2010-01-13 14:32:11

VB.NET確定文件版

2010-01-07 15:49:10

VB.NET DoLoop

2010-01-19 10:03:35

VB.NET Labe
點贊
收藏

51CTO技術棧公眾號

主站蜘蛛池模板: 精品久久香蕉国产线看观看亚洲 | 亚洲精品国产精品国自产在线 | 国产一区二区在线播放 | 51ⅴ精品国产91久久久久久 | 日韩欧美中文 | 久久国产欧美日韩精品 | 日本中文字幕一区 | 欧美日韩国产精品 | 精品欧美黑人一区二区三区 | www.av7788.com | 亚洲精彩免费视频 | 欧美一区二区三区视频在线播放 | 日韩在线视频播放 | 精品视频一区二区三区在线观看 | 精品中文字幕一区二区三区 | 国产观看| 日韩在线免费看 | 红色av社区| 亚洲精品91 | 99久久婷婷国产综合精品电影 | 午夜影院污| 日韩中文一区 | 日本三级电影在线观看视频 | 成人视屏在线观看 | 中文成人在线 | 欧美黑人一区 | 中午字幕在线观看 | 天天干精品 | 中文字幕乱码一区二区三区 | 日韩免费视频一区二区 | 国产精品成人一区二区 | 视频在线亚洲 | 99免费精品视频 | 久久精品欧美一区二区三区不卡 | 久久亚洲欧美日韩精品专区 | 久草精品视频 | 亚洲高清在线视频 | 欧美激情 一区 | 久久三区 | 18av在线播放 | 国产视频2021 |