VB.net电池使用时间百分比

Question

我尝试了很多方法来尝试制作一个显示电池电量百分比的小程序（值显示在进度条上）。任何人都可以帮助我吗？

Answer 1

Dim power As SystemInformation.PowerStatus = SystemInformation.PowerStatus 
Dim percent As Single = power.BatteryLifePercent  

' Display the ProgressBar control. 
    pBar1.Visible = true; 

' Set min and max 
    pBar1.Minimum = 0 
    pBar1.Maximum = 100 

' Set the current value 
    pBar1.Value = percent * 100 

然后，你只需要刷新一个计时器或别的东西。