Lire des nombres dans un fichier binaire

Question

Bonjour à tous,

Avec VB6, comment faire pour afficher une donnée (exemple 414F) lue dans un fichier binaire. 
414F ne sont pas les caractères A et O, mais le nombre 16719.

Je n'arrive pas à afficher 16719, j'obtiens AO ou une erreur Type incompatibles.

Merci d'avance.

Gobillot · Answer

Salut,











    Dim Str   As String

    Dim Nbr As Integer

    

    Str = "414F"

    Nbr = Val("&H" & Str)

    MsgBox Nbr





pourquoi passer par une conversion, alors qu'il suffit de lire directement dans un Integer

si la donn&#233;e bien sur est dans le bon sens (little-endian)



Daniel

rolcos · Answer

Merci Daniel pour cette solution mais elle ne résoud pas vraiment mon pb.

Prenons par exemple un fichier dans lequel il y a 4 fois la lettre F.
Si je l'ouvre avec un éditeur hexa je lis : 46 46 46 46.
Ce qui m'intéresse c'est la valeur en décimal de 46464646, soit 1179010630.

Merci encore.

Gobillot · Answer

la r&#233;ponse est l&#224; pourtant:

    MsgBox Val("&H" & "46464646")


Daniel

Lire des nombres dans un fichier binaire

3 réponses

Discussions similaires