ايران ويج

نسخه‌ی کامل: مشکل با ذخیره متن در نوتپد
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
سلام

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

[تصویر:  959pt318rmb1v7t0n6x2.jpg]

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



Private Sub Command1_Click()
intfnum = FreeFile
Open "e:\untitled.txt" For Output As #intfnum
Write #intfnum, t.Text
Close intfnum
End Sub
علتش اینه که از دستور Write استفاده کردی
دستور Write رشته ها رو توی کتیشن قرار میده و چاپ میکنه و تاریخ و مقادیر بولین رو هم بین علامت شارپ (#)
برای اینکه کدتون درست بشه بجای Write باید از دستور Print استفاده کنید.
یعنی کد درست این میشه:

کد:
Private Sub Command1_Click()
intfnum = FreeFile
Open "e:\untitled.txt" For Output As #intfnum
Print #intfnum, t.Text
Close intfnum
End Sub
متشکرم