[mr3omr]

عرفت الطريقة وحبيت افيدكم ..

إقتباس : If System.IO.File.Exists("q1.txt") = True Then
My.Computer.FileSystem.DeleteFile("q1.txt")
End If
If System.IO.File.Exists("q1.txt") = False Then
FileOpen(1, ("q1.txt"), OpenMode.Output)
PrintLine(1, TextBox1.Text)
FileClose(1)
End If

بحيث لو كان الملف موجود قم بحذفه ثم اذا كان غير موجود اصنع اخر ..
وبذالك يكون فارغ ..