PDA

View Full Version : نحوه ویرایش یک خط خاص از یک فایل متنی



dante2008
پنج شنبه 23 اردیبهشت 1389, 16:19 عصر
دوستان من در یک فایل .txt میخواهم یک خط خواص(به عنوان مثال خط 10) را تغییر دهم و دوباره در همان فایل ذخیره کنم.
لطفا سریع کمکم کنید

M.T.P
پنج شنبه 23 اردیبهشت 1389, 17:43 عصر
دوستان من در یک فایل .txt میخواهم یک خط خواص(به عنوان مثال خط 10) را تغییر دهم و دوباره در همان فایل ذخیره کنم.
لطفا سریع کمکم کنید
فایل رو باز کنید و با دستور Print Line خط مربوطه رو تغییر بدین.

martoor
جمعه 24 اردیبهشت 1389, 12:33 عصر
دوست عزیز شما ساده ترین کاری که می تونی بکنی و یادگیریش هم ساده هست اینه که کل فایل متنی خودت رو بخونی و اون رو در یک لیست باکس قرار بدی و سپس ویرایش خودت رو انجام میدی و دوباره فایل متنی رو مینویسی :
مثال : یه 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