ciao, sono ancora io....

volevo capire perchè quando leggo i dati di un file binario, li cambio, e riapro il file binario, questo non cambia affatto! VVoVe:

codice:
Private Sub Command1_Click()
a = Text1.Text
Put #1, , a
Close #2
End Sub
Private Sub Command2_Click()
Dim a As Long
Open "c:\ciao.bin" For Binary Access Read Write As #2
Get #1, , a
Text1.Text = a
End Sub
PERCHE'?

che abbia sbagliato io qualcosa nel codice o che esista qualche regola che io non so?

GRAZIE DI UN'EVENTUALE RISPOSTA!