[elgokr]

وعليكم السلام ورحمة الله وبركاته

بخصوص تحرير ملف من نوع text  وهو ملف Notepad

فالقي نظرة على هذا الموضوع السورس كود بالمرفق وظيفته

تحرير الملف للاضافة عليه والحذف

http://vb4arb.com/vb/showthread.php?tid=27942

بخصوص فى كل مرة يتم تنفيذ كلك على زر يقوم بكتابة نص معين يتم ادخاله يدوياً

كل ما عليك اضافة هذا السطر خارج اى حدث

كود :

   Private num As Integer = -1

من ثم قم باضافة هذا الكود داخل حدث الزر

كود :

       Dim str As String() = New String() {
           "النص الاول",
           "النص الثاني",
           "النص الثالث",
           "النص الرابع",
           "النص الخامس",
           "النص السادس",
           "النص السابع"
       }
       num = IIf(num >= str.Count - 1, 0, num + 1)
       TextBox1.Text = str(num)

يمكنك تعديل وتزويد النصوص كما تشاء فى str

ناتى تنفيذ كود زر الثاني بداخل زر الاول كل ما عليك هو استخدام هذا الكود

اليك احد الطرق التالية سيقوم بتنفيذ الامر

كود :

Button2_Click(sender, e)

أو

كود :

Button2.PerformClick()

تحياتى لك

وتمنياتى لك التوفيق