温馨提示×

温馨提示×

您好,登录后才能下订单哦!

密码登录×
登录注册×
其他方式登录
点击 登录注册 即表示同意《亿速云用户服务条款》

VB.NET中怎么显示系统信息

发布时间:2021-08-06 15:45:15 来源:亿速云 阅读:140 作者:Leah 栏目:编程语言

VB.NET中怎么显示系统信息,很多新手对此不是很清楚,为了帮助大家解决这个难题,下面小编将为大家详细讲解,有这方面需求的人可以来学习下,希望你能有所收获。

VB.NET显示系统信息技术要点

使用SysInfo控件得到操作系统版本号、电源属性

VB.NET显示系统信息实现过程

■ 新建项目

打开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. '得到操作系统平台代号,其中1表示95/98
    ,2表示nt/2000系统  

  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. '得到操作系统版本号  

  10. Label4.Text = sysinfo.OSVersion & 
    "." & sysinfo.OSBuild  

  11. '得到桌面尺寸大小  

  12. Label6.Text = sysinfo.WorkAreaHeight 
    & "X" & sysinfo.WorkAreaWidth  

  13. '得到电源状态值,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 

看完上述内容是否对您有帮助呢?如果还想对相关知识有进一步的了解或阅读更多相关文章,请关注亿速云行业资讯频道,感谢您对亿速云的支持。

向AI问一下细节

免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。

AI