انتقال نوشته های txt به text بصورت تک تک

بچه ها یک txt دارم که توش یک سری نوشته دارم.
یک دکمه و تکست باکس هم دارم .
حالا می خوام وقتی روی دکمه کلیک کنم کلمه اول از فایل txt (که کنار برنامه هست ) پاک بشه و بیاد توی text . و همینجور که روی دکمه کلیک کنم پیش بره برنامه و دونه دونه کلماتو منتقل کنه به تکست باکس و جایگزین کلمه قبلی بشه.
وقتی فایل txt خالی شد هم می خوام اعلام کنه

سلام. بفرمایید :

ضمیمه 101522

موفق باشید

مرسی از جواب خوبت.
اما این کامل منتقل نمی کنه و دسته ای پاک می کنه. راهی هست دقتشو بالا برد ؟؟!!

توضیحات بیشتر به همراه مثال لطفا .

نقل قول:

---

نوشته شده توسط xrezax

بچه ها یک txt دارم که توش یک سری نوشته دارم.
یک دکمه و تکست باکس هم دارم .
حالا می خوام وقتی روی دکمه کلیک کنم کلمه اول از فایل txt (که کنار برنامه هست ) پاک بشه و بیاد توی text . و همینجور که روی دکمه کلیک کنم پیش بره برنامه و دونه دونه کلماتو منتقل کنه به تکست باکس و جایگزین کلمه قبلی بشه.
وقتی فایل txt خالی شد هم می خوام اعلام کنه

---

شما منظورتون چطور خوندنی هست یعنی میخواین سطر به سطر بخونه ؟ یا اینکه برنامه خودش تشخیص بده کلمه ها رو و اونا رو جدا کنه ..... یعنی از اولین کلمه تا اسپیس بخونه و یک کلمه حساب کنه ؟

اگه میشه کامل توضیح بدین و یک فایل تکست که میخواین برنامه روی اون کار کنه قرار بدین ....

نقل قول:

---

نوشته شده توسط ho3ein.3ven

توضیحات بیشتر به همراه مثال لطفا .

---

تا جواب سوالتون رو دقیق یا بنده یا دوستان دیگر بدن ...... موفق و پیروز باشید در پناه خدا ..... یاعلی

مرسی از لطف دوستان
سطر به سطر بخونه از txt. و به text منتقل کنه
هر سطری هم که خوند از txt حذف بشه.
فکر کنم واضح گفتم دیگه

نقل قول:

---

نوشته شده توسط xrezax

مرسی از لطف دوستان
سطر به سطر بخونه از txt. و به text منتقل کنه
هر سطری هم که خوند از txt حذف بشه.
فکر کنم واضح گفتم دیگه

---

یه مثال بزار ؟ لطفا .....

من با موبایلم الان.
یه پروژه با vb بساز و یک کامند و یک تکست باکس بزار.
یک فایل تکس توی درایو c هم بنام 1.txt بساز و توش ابنو بنویس
1111
2222
3332
3333
7777
5566
5676
حالا میخوام با هربار کلیک روی کامند برنامه سطر اول رو از txt پاک کنه و به text منتقل کنه.
دوباره کلیک کنم رو کامند همین رویداد از اول اتفاق بیوفته.
اگه واضح نبود بگین. بازم توضیح میدم

نقل قول:

---

نوشته شده توسط xrezax

مرسی از لطف دوستان
سطر به سطر بخونه از txt. و به text منتقل کنه
هر سطری هم که خوند از txt حذف بشه.
فکر کنم واضح گفتم دیگه

---

سلام خدمت شما دوست گرامی بفرمایید اینم از سورس شما .... امیدوارم بدردتون بخوره .......

این قسمت از برنامه رو به شکل زیر تغییر بده که مشکل نداشته باشه برنامه ....... من سه خط اول یادم رفته بود بنویسم .......

Private Sub Command1_Click()



List1.Clear

List2.Clear

Text1.Text = ""



    Dim s As String

    fname = App.Path & "\temp.txt"

    s = String(FileLen(fname), " ")

    Open fname For Input As #1

        Do While Not (EOF(1))

            Line Input #1, s

            If s <> "" Then List1.AddItem s

        Loop

    Close #1

End Sub

موفق و پیروز باشید در پناه خدا ..... یاعلی

نقل قول:

---

نوشته شده توسط xrezax

من با موبایلم الان.
یه پروژه با vb بساز و یک کامند و یک تکست باکس بزار.
یک فایل تکس توی درایو c هم بنام 1.txt بساز و توش ابنو بنویس
1111
2222
3332
3333
7777
5566
5676
حالا میخوام با هربار کلیک روی کامند برنامه سطر اول رو از txt پاک کنه و به text منتقل کنه.
دوباره کلیک کنم رو کامند همین رویداد از اول اتفاق بیوفته.
اگه واضح نبود بگین. بازم توضیح میدم

---

خب فک کنم برنامه ای هم که من نوشته بودم دقیقا همین کار رو می کرد.