تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] اضافة كلمة في جميع اسطر listbox
#1
                                                  السلام عليكم ورحمة الله وبركاته



اريد من اخوتي الكرام كود لوضع كلمة معينة في جميع اسطر listbox
هدا مثال




 
واكون شاكر لكم علي افادتي
الرد }}}
تم الشكر بواسطة:
#2
الكود تقريبا سيكون شكله هكذا


PHP كود :
Public Class Form1
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        
' لتملأ الليست بوكس الأولي بالارقام التي تريدها
        For i As Integer = 1 To 100
            ListBox1.Items.Add(i.ToString)
        Next
    End Sub

    Private Function AddWord(word As String, itemText As String) As String
        Return word + itemText
    End Function

    Private Function AddWord(word As String, lb As ListBox) As String()
        Dim result As List(Of String) = New List(Of String)()
        If lb.Items IsNot Nothing Then
            For i As Integer = 0 To lb.Items.Count - 1
                Dim item As String = TryCast(lb.Items(i), String)
                result.Add(AddWord(word, item))
            Next
        End If
        Return result.ToArray
    End Function

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim s As String = TextBox1.Text
        If Not String.IsNullOrEmpty(s) Then
            ListBox2.Items.Clear()
            Dim strings As String() = AddWord(s, ListBox1)
            For i = 0 To strings.Length - 1
                ListBox2.Items.Add(strings(i))
            Next
        End If
    End Sub
End Class 
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تعديل طول حقل معين في جميع جداول القاعدة atefkhalf2004 1 86 09-03-24, 03:17 AM
آخر رد: atefkhalf2004
  تحميل جميع الماسحات الضوئية المتصلة بالجهاز في كومبوبوكس جيولوجي مبتدئ 2 178 22-02-24, 07:10 PM
آخر رد: جيولوجي مبتدئ
  اضافة ادوات لفيجوال بيسك خالد20 10 1,964 18-12-23, 07:51 PM
آخر رد: ابراهيم عبدالباقى
  [VB.NET] listbox تلوين عدد من هذه الأسماء mervandz 3 413 18-11-23, 01:35 AM
آخر رد: sniper2030
Information [VB.NET] حذف كل العناصر التي تاتي بعد عنصر الذي احدده listbox mervandz 3 287 10-11-23, 07:12 PM
آخر رد: justforit
  [VB.NET] احتاج كود يغلق جميع الفورم ويبقي فقط الفورم Home Ali_hassn 4 542 15-08-23, 06:43 PM
آخر رد: Alexander Max2
  اريد اضافة متغيراخر داخل Listbox1 احتاج تعديل بسيط moh61 0 340 05-08-23, 02:29 PM
آخر رد: moh61
  [سؤال] كيفية اضافة في اكثر من جدول ahmed_king2023 0 362 29-07-23, 12:03 PM
آخر رد: ahmed_king2023
  سؤال حول اغلاق جميع النوافذالمفتوحة maherhaddaf 3 452 20-07-23, 08:48 AM
آخر رد: maherhaddaf
  أريد كود لغلق جميع النوافذ عند تسجيل الخروج Emam emam 2 502 10-07-23, 02:12 AM
آخر رد: Emam emam

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


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