Oregon ho risolto ^_^

Imports System
Imports System.IO
Imports System.Text


Dim myFile As IO.FileStream
Dim Lettura As String

myFile = New IO.FileStream("slot0.sav", IO.FileMode.Open, IO.FileAccess.Read)
myFile.Seek(LaPosizioneCheMiServe, 0)
Lettura = myFile.ReadByte
MsgBox(Lettura)

Praticamente con Seek si posiziona al punto che so io, e con ReadByte mi da la cifra che normalmente cambio usando quell'editor HxD che me li mostra esadecimali

Poi per salvare il file col valore cambiato


myFile = New IO.FileStream("slot0.txt", IO.FileMode.Open, IO.FileAccess.Write)
myFile.Seek(LaPosizioneCheMiServe, 0)
Dim bteWrite As Byte = LaNuovaCifraSceltaDaMe
myFile.WriteByte(bteWrite)

Funziona Benissimo

GRAZIE PER LA PAZIENZA OREGON