برعکس کردن لیست !

[randyerfan 63]

با سلام ، من میخوام یک آبجکن List رو بصورت برعکس بخونم ( از پایین به بالا ) 

لطفا راهنمایی کنید .

[مجید آرتا 5,874]

سلام

روش ساده :

Dim list1 As List
For i = list1.Size - 1 To 0 Step - 1
 Log("Reverse List Item #"&list1.Get(i))
Next

حالت دوم:

تعریف یک User Type :

Type Avg(Student As String,num As Int)

مقدار دادن به لیست :

Dim l As List
For i = 0 To 9
 Dim data As Avg
 data.Initialize
 data.Student = "Arta"&i
 data.num = Rnd(0,20)
 l.Add(data)
Next

حالا مقادیر رو برعکس می کنیم ( تست نکردم شاید درست نباشع ) »

l.SortType("num",False)
For j = 0 To l.Size - 1
 Dim data2 As Avg
 data2 = l.Get(i)
 listview1.AddTwoLines(data2.num,data2.Student)
Next