BINARY AS PUT........

Vorrei scrivere in un file.txt andando a modificare solo una riga specifica, devo usare binary as put, solo che non mi viene cambiata la riga voluta ma sempre la prima:

Private Sub Command2_Click()
Open "C:\Users\enric\Desktop\Vba guida youtube\23\Corse.txt" For Binary As #1
'Put #1,NumeroRecord,Riga
Put #1, 1, Text1.Text
Close #1
End Sub

Come potrei risolvere la situazione?