مشکل با ذخیره متن در نوتپد

سلام

من وقتی میخواهم متنی رو در یک تکست باکس توی یک نوتپد ذخیره کنم به صورت شکل زیر ذخیره میشه و همانطور که توی عکس میبینید اول و آخر متن یک علامت کوتیشن ( " ) میذاره. :

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

برای اینکه متن رو درست ذخیره کنه و کوتیشن نذاره چیکار باید کرد؟

ضمن اینکه من از این دستور استفاده میکنم :

Private Sub Command1_Click()
intfnum = FreeFile
Open "e:\untitled.txt" For Output As #intfnum
Write #intfnum, t.Text
Close intfnum
End Sub

اين يه راهش:

کد:

---

Private Sub Command1_Click()
intfnum = FreeFile
Open "e:\untitled.txt" For Binary As #intfnum
Put #intfnum, 1, Text1.Text
Close intfnum
End Sub

---

متشکرم === thank you