سلام دوست عزیز ، امیدوارم حالت خوب باشه ،
این سوال شما شامل چند قسمت هست ،
1 ) باز کردن یک فایل با پسوند .txt داخل برنامه ، این کد میتونه یک راهنمایی باشه :
Dim ofd As New OpenFileDialog
ofd.Title = "لطفا مسیر فایل تکست را انتخاب نمایید"
ofd.Filter = "Text Files(*.txt)|*.txt"
If ofd.ShowDialog = DialogResult.OK Then
Dim FStream As New FileStream(ofd.FileName, FileMode.Open, FileAccess.Read)
Dim fsReader As New StreamReader(FStream)
While fsReader.Peek > -1
TextBox1.Text &= fsReader.ReadLine()
End While
fsReader.Close()
End If
یا به روش ساده تر :
TextBox1.Text = My.Computer.FileSystem.ReadAllText(ofd.FileName)
2 ) واسه اینکه بعد از اینکه تغییرات رو انجام دادی و دکمه ی Save رو زدی تغییرات رو به همون فایل منتقل کنه :
میتونین مسیر فایل رو در یک متغیر(مثلا masirFiele) قرار بدین سپس از طریق متد WriterallText راحت میتونین تغییرات رو ذخیره کنین :
If MasirFile <> "" Then
My.Computer.FileSystem.WriteAllText(MasirFile, TextBox1.Text, False)
MessageBox.Show("تغییرات با موفقیت اعمال شد")
End If
3 ) راحت میتونین از یک Listbox برای اینکار استفاده کنین و بعد از هر تغییر و یا ایجاد فایلی مسیر رو داخل این Listbox اضافه کنین.
موفق باشید./