دوستان من در یک فایل .txt میخواهم یک خط خواص(به عنوان مثال خط 10) را تغییر دهم و دوباره در همان فایل ذخیره کنم.
لطفا سریع کمکم کنید
Printable View
دوستان من در یک فایل .txt میخواهم یک خط خواص(به عنوان مثال خط 10) را تغییر دهم و دوباره در همان فایل ذخیره کنم.
لطفا سریع کمکم کنید
فایل رو باز کنید و با دستور Print Line خط مربوطه رو تغییر بدین.نقل قول:
نوشته شده توسط dante2008
دوست عزیز شما ساده ترین کاری که می تونی بکنی و یادگیریش هم ساده هست اینه که کل فایل متنی خودت رو بخونی و اون رو در یک لیست باکس قرار بدی و سپس ویرایش خودت رو انجام میدی و دوباره فایل متنی رو مینویسی :
مثال : یه ListBox تو فرم درست کن و کد زیر رو مثلا در Form_Load قرار بده .
Open "C:\test.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, a
List1.AddItem a
Loop
Close
حالا مثلا خط دوم فابلتون میشه خانه ی دوم ListBox شما ، بعد از ویرایش ListBox میتونید اون رو دوباره بنویسید :
Open "C:\test.txt" For Output As #1
For i = 0 to List1.listcount-1
a = list1.list(i)
Print a
Next
Close