+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : أريد Method أو دالة لعمل أستبدال Replace (/showthread.php?tid=9850)
أريد Method أو دالة لعمل أستبدال Replace - VS2015 - 30-07-13
بسم الله الرحمن الرحيم
انا عندي تيكست بوكس عايز لو مكتوب فيه abc يقوم يستبدل الa بaa والb بbb والc بcc يعني التيكست بوكس هيكون مكتوب فيه aabbcc بدل abc
مع العلم ان الحروف هتكون جنب بعضها من غير مسافات مع شرح طريقة إضافة حرف جديد للأستبدال
يعني لو حضرتك هتعمل البرنامج بيستبدل حرف a,b,c عايز اعرف الكود الي اضيفه ومكانه فين عشان أضيف بيها حرف الd كمان عشان يبدله بdd عشان انا هعمل كتير بس عايز مثال بثلاث حروف بس
انا عندي تيكست بوكس عايز لو مكتوب فيه abc يقوم يستبدل الa بaa والb بbb والc بcc يعني التيكست بوكس هيكون مكتوب فيه aabbcc بدل abc
مع العلم ان الحروف هتكون جنب بعضها من غير مسافات مع شرح طريقة إضافة حرف جديد للأستبدال
يعني لو حضرتك هتعمل البرنامج بيستبدل حرف a,b,c عايز اعرف الكود الي اضيفه ومكانه فين عشان أضيف بيها حرف الd كمان عشان يبدله بdd عشان انا هعمل كتير بس عايز مثال بثلاث حروف بس
أريد Method أو دالة لعمل أستبدال Replace - kslawy - 30-07-13
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = TextBox1.Text.Replace("a", "aa").Replace("b", "bb").Replace("c", "cc")
End Sub