السلام عليكم
Dim items As List(Of ListViewItem) = Array.ConvertAll((From n In companyName Select n.Text).ToArray(), Function(s) New ListViewItem(s)).ToList
Dim items1 As List(Of ListViewItem) = Array.ConvertAll((From n In phones Select n.Text).ToArray(), Function(s) New ListViewItem(s)).ToList
Dim items2 As List(Of ListViewItem) = Array.ConvertAll((From n In adress Select n.Text).ToArray(), Function(s) New ListViewItem(s)).ToList
glist.Items.AddRange(items.ToArray)
items1
items2
ازاي اضيفهم الي SubItems
ولكن عبر AddRange
كيف يمكن ذلك
جرب هذه الطريقة
Dim items As New List(Of ListViewItem)
For i = 0 To CompanyName.Count - 1
items.Add(New ListViewItem(New String() {CompanyName(i).Text, phones(i).Text, adress(i).Text}))
Next
glist.Items.AddRange(items.ToArray)
(10-03-19, 04:48 PM)5000 كتب : [ -> ]جرب هذه الطريقة
Dim items As New List(Of ListViewItem)
For i = 0 To CompanyName.Count - 1
items.Add(New ListViewItem(New String() {CompanyName(i).Text, phones(i).Text, adress(i).Text}))
Next
glist.Items.AddRange(items.ToArray)
شكرا جزيلا
ولكن انا اريد الابتعاد عن حلقة الدوران لازيد من سرعة البرنامج
بما ان CompanyName عبارة عن مصفوفة فاريد اضافتها مصفوفة مباشرة لسرعة الوقت
وبالفعل لما عملتها بانت انها اسرع بكثير من حلقة الدوران ولكن بقت المشكلة في subitems
لذا ابحث عن حل لذلك
ولكن الكود الذي وضعته لك يضيف address وphones في subitems
(10-03-19, 05:15 PM)5000 كتب : [ -> ]ولكن الكود الذي وضعته لك يضيف address وphones في subitems
نعم اعلم
ولكن داخل حلقة دوران انا لا اريد استخدم حلقة دوران خالص
انا قدرت اضيف اول شيء كمصفوفة بدون اخطاء ولكن لم اعرف كيف ذلك مع subitems
واكيد ليها طريقة
جرب هذا الكود
Dim items As List(Of ListViewItem) = (From n In Enumerable.Range(0, CompanyName.Count - 1) Select New ListViewItem(New String() {CompanyName(n).Text, phones(n).Text, adress(n).Text})).ToList
glist.Items.AddRange(items.ToArray)
(10-03-19, 05:33 PM)5000 كتب : [ -> ]جرب هذا الكود
Dim items As List(Of ListViewItem) = (From n In Enumerable.Range(0, CompanyName.Count - 1) Select New ListViewItem(New String() {CompanyName(n).Text, phones(n).Text, adress(n).Text})).ToList
glist.Items.AddRange(items.ToArray)
الله ينور عليك والله
تسلم ايدك اشتغل تمام
بس تفتكر كدا اسرع من حلقة الدوران ولا نفس الوقت؟
يتضح عند استخدام بيانات كثيرة،
للأسف ليس لدي مشروع به بيانات كثيرة لتجربة سرعة هذا الكود ومعرفة الفرق