日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間:8:30-17:00
你可能遇到了下面的問(wèn)題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷解決方案
VB.NET顯示系統(tǒng)信息正確實(shí)現(xiàn)方法介紹

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

成都創(chuàng)新互聯(lián)是一家專注于網(wǎng)站建設(shè)、成都網(wǎng)站設(shè)計(jì)與策劃設(shè)計(jì),翔安網(wǎng)站建設(shè)哪家好?成都創(chuàng)新互聯(lián)做網(wǎng)站,專注于網(wǎng)站建設(shè)10多年,網(wǎng)設(shè)計(jì)領(lǐng)域的專業(yè)建站公司;建站業(yè)務(wù)涵蓋:翔安等地區(qū)。翔安做網(wǎng)站價(jià)格咨詢:13518219792

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

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

VB.NET顯示系統(tǒng)信息技術(shù)要點(diǎn)

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

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

■ 新建項(xiàng)目

打開(kāi)Visual Studio.NET,選擇“新建項(xiàng)目”,在項(xiàng)目類型窗口中選擇“Visual Basic項(xiàng)目”,在模板窗口中選擇“Windows應(yīng)用程序”,在名稱域中輸入“SysInfo”,然后選擇保存路徑。單擊“確認(rèn)”。

■ 添加控件

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

■ 設(shè)置屬性

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

■ 添加代碼

 
 
 
  1. Private Sub Form1_Load(ByVal 
    sender As System.Object, ByVal 
    e As System.EventArgs) Handles 
    MyBase.Load  
  2. '得到操作系統(tǒng)平臺(tái)代號(hào),其中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)版本號(hào)  
  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. '得到電池剩余時(shí)間,當(dāng)電池為交流電源時(shí),
    返回為-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 

■ 運(yùn)行程序

單擊菜單“調(diào)試|啟動(dòng)”或單擊 圖標(biāo)運(yùn)行程序。

小結(jié)

sysinfo控件的所有屬性都是只讀的,因此我們只能在代碼中讀取。通過(guò)使用sysinfo控件可以幫助我們創(chuàng)建與Windows登錄程序相似的程序。即當(dāng)我們改變系統(tǒng)分辨率或?qū)⒁粋€(gè)即插即用的裝置插上或拔下時(shí),我們的程序能夠?qū)Υ俗龀龇磻?yīng)。通過(guò)使用sysinfo控件可以得到操作系統(tǒng)信息、屏幕設(shè)置信息和電源狀態(tài)信息。其中,得到屏幕的尺寸大小不包括被Windows任務(wù)欄所占的部分。

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


網(wǎng)頁(yè)標(biāo)題:VB.NET顯示系統(tǒng)信息正確實(shí)現(xiàn)方法介紹
轉(zhuǎn)載源于:http://m.5511xx.com/article/ccioshp.html