[3booody]

ولايهمك اخي تدلل

كود :

For Each txt As String In RichTextBox1.Lines

الكود السابق عبارة عن حلقة تكرارية لمتغير نصي يأخذ قيمته من جميع اسطر ال RichTextBox وبالترتيب من الاعلى للأسفل

اما هذا الكود

كود :

RichTextBox2.Text &= TextBox1.Text & txt & TextBox2.Text & vbNewLine

فهو يضيف السطر المأخوذ من الحلقة التكرارية بأضافة التكست بوكس الاول والثاني في البداية والنهاية للمتغير النصي مع سطر جديد

يعني اول سطر من RichTextBox القائمة يضاف الى RichTextBox النتيجة بالتغيير الموضع   ثم تقوم الحلقة التكرارية بالتغيير للسطر الثاني ثم يضاف وهكذا .... الى نهاية الاسطر 

ان شاء الله يكون الشرح مفهوم تحياتي لك اخي