حذف علامات معينة - نسخة قابلة للطباعة

حذف علامات معينة - نسخة قابلة للطباعة

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

حذف علامات معينة - محمد خيري - 16-12-24

السلام عليكم و رحمة الله
اخواني ممكن مساعدة
نفترض عندي بالتاكست بكس 1 الكلمة ( VISUAL_BASIC_NET )
هل يمكن بواسطة زر الأمر اعادة كتابة هذي الكلمة بالتاكس بكس 2 و ينحذف منها الرموز (_) ان وجدت
تصبح مكتوبة هكذا VISUALBASICNET
و بارك الله فيكم

RE: حذف علامات معينة - Kamil - 16-12-24

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

جربالكود التالي

PHP كود :

Private Sub button1_Click(sender As Object, e As EventArgs) Handles button1.Click
    ' قراءة النص من TextBox1
    Dim originalText As String = textBox1.Text
    
    ' إزالة الرموز (_) من النص
    Dim modifiedText As String = originalText.Replace("_", "")
    
    ' وضع النص المعدل في TextBox2
    textBox2.Text = modifiedText
End Sub 

RE: حذف علامات معينة - محمد خيري - 16-12-24

بارك الله فيك اخي Kamil
مضبوط تماما ان شاء الله
جزاك الله كل خير

RE: حذف علامات معينة - aljzazy - 21-12-24

نعم، يمكنك استخدام وظيفة بسيطة لإزالة الرموز

كود :

_

من النص الموجود في TextBox1 وكتابة النص المُعدل في TextBox2 باستخدام زر الأمر.
إليك الكود المطلوب:

الكود:
vb
نسخ الكود

كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

    ' احصل على النص من TextBox1

    Dim originalText As String = TextBox1.Text

    ' إزالة الرموز (_) من النص

    Dim modifiedText As String = originalText.Replace("_", "")

    ' وضع النص المعدل في TextBox2

    TextBox2.Text = modifiedText

End Sub

شرح الكود:

: يحصل على النص المكتوب في مربع النص الأول.
Replace("_", "")
:
- يستخدم لإزالة جميع الرموز
  _
- الموجودة في النص.
- يستبدل كل رمز
  _
- بسلسلة فارغة
  ""
- .
TextBox2.Text
: يتم وضع النص المُعدل (بدون الرموز) في مربع النص الثاني