+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184)
+--- الموضوع : معلومة ::: PowerStatus (/showthread.php?tid=5286)
معلومة ::: PowerStatus - RaggiTech - 06-10-12
كاتب الموضوع : BADRMEDIA
PowerStatus :
هذا العنصر يزودك بمعلومات عن حالة مصدر الطاقة بالنظام وهو من عناصر SystemInformation
مثلا لو أردنا أن نعرف حالة شحن البطارية مثلاً فمن الخاصية BatteryChargeStatus للعنصر
كود :
Select Case SystemInformation.PowerStatus.BatteryChargeStatus
Case BatteryChargeStatus.Charging
MessageBox.Show("البطارية تشحن")
Case BatteryChargeStatus.Critical
MessageBox.Show("البطارية منخفضة جداً فى وضع خطر")
Case BatteryChargeStatus.High
MessageBox.Show("البطارية مرتفعة")
Case BatteryChargeStatus.Low
MessageBox.Show("البطارية منخفضة")
Case BatteryChargeStatus.NoSystemBattery
MessageBox.Show("لا يوجد بطارية بالنظام")
Case BatteryChargeStatus.Unknown
MessageBox.Show("غير معروف")
End Select