salut,
oupss, j'avais pas fait gaffe que tu voulais du vb.net...
EBArtSoft> je me le suis demandé aussi...
'le cheminde ton fichier
dim fichier as string = ""
'pour lire ton fichier
dim fs as filestream = new filestream(fichier)
dim pages as integer = fs.length \ 16 ' 16 est le nombre de colonnes de ton affichage
'pour chaque ligne entière (16 bytes)
for i as integer = 0 to pages - 1
dim li as listviewitem
'remplit la ligne avec 16 octets
set li = ton_listview.items.add(hex(fs.readbyte()))
li.subitems.add(hex(fs.readbyte()))
li.subitems.add(hex(fs.readbyte()))
li.subitems.add(hex(fs.readbyte()))
...
next
'si il reste une ligne incomplète, moins de 16 octets de la position en cours à la fin du fichier
if fs.length mod 16 > 1 then
dim li as listviewitem
set li = ton_listview.items.add(hex(fs.readbyte()))
end if
'pour chaque octet supplémentaire de la ligne incomplète jusqu'à la fin du fichier
for i = 1 to (fs.length mod 16) - 1
li.subitems.add(hex(fs.readbyte()))
next
ShareVB