Discussion :

[Miska59]

Bonjour, j'arrive pas à voir en subtract une valeur hexadécimal avec textbox3.lines.

exemple : 1b - 1 = 1a

voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Dim subtract As Integer = 0
            Dim result As Integer = 0
            For Each Line As String In TextBox3.Lines
                If Integer.TryParse(Line, Globalization.NumberStyles.HexNumber, Nothing, subtract) Then
                    result -= subtract
                End If
            Next
            TextBox4.Text = Hex(result)
        End If

dans mon textbox3, j'ai ajouter : 1b
1

est le résulta l'affiche dans textbox4.
Pouvez-vous me dire comment puis je corriger cela car obtient une autre valeur : FFFFFFE4?
Merci d'avance.

[popo]

Tu as deux problèmes.

Le premier est que tu commences à soustraire à partir de 0.
Ton algo fait 0-27-1 et trouve donc -28.

Le deuxième est que la conversion effectuée par Hex() considère que l'entier que tu lui passe n'est pas signé.
Pour une valeur négative, il faut donc faire "-" & Hex(Math.Abs(result)) ou encore $"-{Math.Abs(result):X}"