Erreur While, Do Loop, ... [VB.NET]

• erreur
• vb
• while
• loop
• net
• do

• LeGeek57510, mercredi 29 août 2018 à 10h1129/08/18 à 10h11
• Modifié par artragis

Bonjour, J’ai actuellement ce code:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim Thread1 As New Thread(Sub() viewBattery())
        Thread1.IsBackground = True
        Thread1.Start()

    End Sub

    Sub viewBattery()
        Do
            If battery <> (SystemInformation.PowerStatus.BatteryLifePercent * 100) Then
                battery = (SystemInformation.PowerStatus.BatteryLifePercent * 100)
                Invoke(New MethodInvoker(Sub()
                                             Label1.Text = "Actuellement: " & battery & "%"
                                         End Sub))
            End If
        Loop
    End Sub

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:

Alors comment faire ? Merci

• 29/08/18 à 10h11
• Modifié

+0 -0

• artragis, mercredi 29 août 2018 à 10h5329/08/18 à 10h53
• Staff

J’ai modifié ton message pour que l’image apparaisse.

Tu peux aussi héberger tes images sur le site.

• 29/08/18 à 10h53

+0 -0

• LeGeek57510, mercredi 29 août 2018 à 11h1929/08/18 à 11h19

Merci

• 29/08/18 à 11h19

+0 -0

• LeGeek57510, jeudi 30 août 2018 à 21h0930/08/18 à 21h09

Une solution ? Merci

• 30/08/18 à 21h09

+0 -0

• LeGeek57510, vendredi 31 août 2018 à 18h5131/08/18 à 18h51

Finalement j’ai réussi, il a juste fallut vérifier si le Invoke était requis.

• 31/08/18 à 18h51

+0 -0