[Blue Sky]

قد أضفنا العناصر عن طريق الخاصية Add التابعة للخاصية Item المسئولة عن العناصر

لكن ماذا لو كان الذى سيضاف ليس عنصر عنصر بل نطاق غير محدد

سيكون علينا استخدام AddRange كاضافة نطاق

كود :

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


        Dim strDataRange() As String = {"A", "B", "C", "D", "E"}
        ListBox1.Items.AddRange(strDataRange)


    End Sub

قمنا بتعريف متغير نصي كمصفوفة ذات بعد محدد strDataRange

وادخلنا لها قيم مباشرة

وارسلناها للخاصية AddRange