[أبو خالد الشكري]

حبيبي طه

كل شيء تمام ، ولكن بنسبة 90% 

البرنامج حسب تعليماتك شغالة 
 وهو يحفظ ويسترجع ملون شيء أبهرني وفرحت كثيرا جدا ما شاء الله

بس بقت إشكالية واحدة 

لما أحط السطر الأخير 

كود :

RichTextBox1.LoadFile(Application.StartupPath & "\TA.rtf", RichTextBoxStreamType.RichText)

يعطيني رسالة الخطأ التالية :



ولكني عندما أضع نفس ذلك السطر في زر Button وأضغط عليه بعد أن يتم عرض الكلام (الملخبط) فإنه يعيد قراءته ملون بشكل صحيح وجميل
وعندما أضع ذلك السطر ضمن السطور الأخرى هكذا :

كود :

   If DR_my_codes.HasRows Then

           RichTextBox1.Text = DR_my_codes("Mycode")
           RichTextBox1.SaveFile(Application.StartupPath & "\TA.rtf", RichTextBoxStreamType.PlainText)

           RichTextBox1.LoadFile(Application.StartupPath & "\TA.rtf", RichTextBoxStreamType.RichText)

فإن رسالة الخطأ نظهر مباشرة 

أتعبني وجنني وحيرني ، حاولت أتحايل عليه بعدة طرق ، لكن الملعون ما طاع يستوي !

---

لو فيه أمر معين يحول النص الملخبط إلى نص صحيح إذن أخبرني به
فقد تنجح العملية .