VB6 cancellare testo da file

[SKIAT]

ciao

chi mi sa dire come posso fare per eliminare
solo una riga da un file di testo!?

grazie già ore riciao

[steno12]

è semplice:

dim testo as string
dim a as string
dim Acapo as string
n=0
testo=""
Acapo=chr$(10) + chr$(13)
riga=3 'invece che tre puoi mettere riga=text1.text
'text1.text contiene il numero della riga che devi cancellare
'che hai inseroto sul form
open "MioFile.txt" for imput as #1
while not eof(1)
n=n+1
input #1,a
if a="RigaDaEliminare" then
'if n=riga then 'e togli if a="RigaDaEliminare" then
else
testo=testo & a & Acapo
end if
wend
close #1

open "MioFile.txt" for output as #1
print #1,testo
close #1

se invece conosci il numero di riga sostituisci con........
if n=riga then