PrivateSub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
Dim Thread1 AsNew Thread(Sub() viewBattery())
Thread1.IsBackground = True
Thread1.Start()
EndSubSub viewBattery()
DoIf battery <> (SystemInformation.PowerStatus.BatteryLifePercent * 100) Then
battery = (SystemInformation.PowerStatus.BatteryLifePercent * 100)
Invoke(New MethodInvoker(Sub()
Label1.Text = "Actuellement: " & battery & "%"EndSub))
EndIfLoopEndSub
Qui me permet d’avoir le pourcentage de ma battery en temps réel. Donc jusque là tout fonctionne, mais lorsque je ferme le logiciel, sa m’affiche une erreur:
Finalement j’ai réussi, il a juste fallut vérifier si le Invoke était requis.
+0
-0
Connectez-vous pour pouvoir poster un message.
Connexion
Pas encore membre ?
Créez un compte en une minute pour profiter pleinement de toutes les fonctionnalités de Zeste de Savoir. Ici, tout est gratuit et sans publicité.
Créer un compte