bonjour,

j'ai un petit problème avec un code , j'ai message erreur : Impossible de convertir les valeurs 'Byte' en 'Char'. Utilisez 'Microsoft.VisualBasic.ChrW' pour interpréter une valeur numérique en tant que caractère Unicode ou convertissez-la d'abord en 'String' pour obtenir un chiffre.

voici une partie de mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private ID_protect As Byte
            Dim i As Integer
            For i = 0 To Me.file_from_len - 1
                Me.ID_protect = CByte(reader.BaseStream.ReadByte)
                If (i = &H150) Then
                    Me.buffer_protect(i) = ChrW(1)
                Else
                    Me.buffer_protect(i) = DirectCast(ID_protect, Char)
                End If
            Next i
            reader.Close()
message d'erreur en rouge? pouvez-vous m'aider a corriger cet petite erreur.merci