تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال في حذف كلمه
#1
محتاج كود اضعه في زر يحذف الرقم والاقواس   وزارة العدل - محاكم الاسرة (230)
من الليست بوكس
الرد
تم الشكر بواسطة:
#2
السلام عليكم...
إتبع:
http://vb4arb.com/vb/showthread.php?tid=17137
الرد
تم الشكر بواسطة: mohamedahmed1 , اليوم السابع , asemshahen5
#3
كود :
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load

       For n = 0 To 5


           Dim s As String = "وزارة العدل - محاكم الاسرة ({0})"

           ListBox1.Items.Add(String.Format(s, n))

       Next


   End Sub

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

       For t = 0 To ListBox1.Items.Count - 1


           ListBox1.Items.Item(t) = ListBox1.Items.Item(t).ToString.Replace("(", "").Replace(")", "")

       Next




   End Sub
الرد
#4
(22-01-20, 01:10 AM)tariq2812 كتب :
كود :
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load

       For n = 0 To 5


           Dim s As String = "وزارة العدل - محاكم الاسرة ({0})"

           ListBox1.Items.Add(String.Format(s, n))

       Next


   End Sub

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

       For t = 0 To ListBox1.Items.Count - 1


           ListBox1.Items.Item(t) = ListBox1.Items.Item(t).ToString.Replace("(", "").Replace(")", "")

       Next




   End Sub
شكرا لك يا محترم
الرد
تم الشكر بواسطة: asemshahen5



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم