تقييم الموضوع :
  • 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 
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] اضافة صور وحذف صور منقاعدة البيانات محمد اسماعيل 2 69 15-01-18, 09:51 AM
آخر رد: محمد اسماعيل
  [سؤال] تفعيل خاصية TextChanged للبحث عن عناصر listbox & وتفعيل زر Enter waelalmsry75 2 94 12-01-18, 07:58 PM
آخر رد: waelalmsry75
  كيف يتم اظهار كلمة مدين اذاكان المبلغ موجب ودائن اذا كان المبلغ سالب بجوار Textbox السيد الجوهري 1 81 08-01-18, 02:06 PM
آخر رد: nooralcown
  كيفية جعل جميع date time picker الموجودة في الproject تاخذ من تاريخ السيرفر وليس الجه تناسيم 2 80 01-01-18, 04:57 PM
آخر رد: تناسيم
Exclamation [سؤال] كيف اشغل برنامجي على جميع الفريموروك mudz 35 12,068 26-12-17, 03:47 PM
آخر رد: عماد البشبيشى
  اضافة او تغيير على مشروع اخر gawhar 0 41 11-12-17, 03:03 PM
آخر رد: gawhar
  [VB.NET] المساعدة في اضافة وحفظ بيانات الداتا جريد محمد اسماعيل 1 77 10-12-17, 10:16 PM
آخر رد: حريف برمجة
  [VB.NET] اضافة صفوف للداتا جريد فيو محمد اسماعيل 2 78 03-12-17, 09:40 PM
آخر رد: محمد اسماعيل
  تغير لون ال ListBox Forecolor تحت شرط khaled12345 3 90 03-12-17, 05:26 PM
آخر رد: alsouf
  [VB.NET] كيف اخذ كل كلمة من ملف text واضعها في excel sheet smsm3650 0 48 28-11-17, 06:02 PM
آخر رد: smsm3650

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


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