Getting remaining battery power and battery status using VB.NET

Getting remaining battery power and battery status using VB.NET

The following VB.NET will make use of the SystemInformation class in order to obtain the battery charge status in percentages and the current power source: AC power / battery charging or battery power / battery not charging.

'Objects for retrieving the information

Dim psBattery As PowerStatus = SystemInformation.PowerStatus

Dim perFull As Single = psBattery.BatteryLifePercent

'Show the remaining battery power in percentages

MsgBox("Total battery power remaining: " & perFull * 100 & "%")

'Is the battery charging?

If psBattery.PowerLineStatus = PowerLineStatus.Online Then

    MsgBox("Battery charge status: Charging")

ElseIf psBattery.PowerLineStatus = PowerLineStatus.Offline Then

    MsgBox("Battery charge status: Not charging")

End If
Nathan Pakovskie is an esteemed senior developer and educator in the tech community, best known for his contributions to With a passion for coding and a knack for simplifying complex tech concepts, Nathan has authored several popular tutorials on C# programming, ranging from basic operations to advanced coding techniques. His articles, often characterized by clarity and precision, serve as invaluable resources for both novice and experienced programmers. Beyond his technical expertise, Nathan is an advocate for continuous learning and enjoys exploring emerging technologies in AI and software development. When he’s not coding or writing, Nathan engages in mentoring upcoming developers, emphasizing the importance of both technical skills and creative problem-solving in the ever-evolving world of technology. Specialties: C# Programming, Technical Writing, Software Development, AI Technologies, Educational Outreach

Leave a Reply

Your email address will not be published. Required fields are marked *

Back To Top