منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] استبدال رمز معين بسطر جديد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] استبدال رمز معين بسطر جديد (/showthread.php?tid=28505)



استبدال رمز معين بسطر جديد - waelalmsry75 - 07-02-19

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

فإذا كان النص هكذا: 
إنما الأعمال بالنيات$ وإنما لكل امرئ ما نوى$ فمن كانت هجرته إلى الله ورسوله فهجرته إلى الله ورسوله$ ومن كانت هجرته لدنيا يصيبها، أو امرأة يتزوجها، فهجرته إلى ما هاجر إليه.

فالمطلوب أن يكون هكذا:
إنما الأعمال بالنيات
وإنما لكل امرئ ما نوى
فمن كانت هجرته إلى الله ورسوله فهجرته إلى الله ورسوله
ومن كانت هجرته لدنيا يصيبها، أو امرأة يتزوجها، فهجرته إلى ما هاجر إليه.

وجزاكم الله خيرا


RE: استبدال رمز معين بسطر جديد - ابراهيم ايبو - 07-02-19

السلام عليكم اخي الكريم
استحدم RichText بدلا من TextBox  لتظهر السطور واستخدم الكود التالي
كود :
RichTextBox1.Text = RichTextBox1.Text.Replace("$", "" & Environment.NewLine)



RE: استبدال رمز معين بسطر جديد - waelalmsry75 - 07-02-19

(07-02-19, 11:58 AM)ابراهيم ايبو كتب : السلام عليكم اخي الكريم
استحدم RichText بدلا من TextBox  لتظهر السطور واستخدم الكود التالي
كود :
RichTextBox1.Text = RichTextBox1.Text.Replace("$", "" & Environment.NewLine)
وعليكم السلام ورحمة الله وبركاته
جزاك الله خيرا ونفع بك .. أخي الكريم