مرتب سازی از کوچک به بزرگ

[aliman12]

درود بر شما یاران وفادار گرانقدر
پیش تر بلد بودم این کار را بکنم یعنی در یک لیست باکس 10 عدد داریم حال میخواهیم این اعداد را از کوچک به بزرگ در درون لیست باکس مرتب کنیم و نمایش دهیم
میدانم که با دو حلقه for درهم اینکار انجام میشود اما امروز هرچه تلاش کردم به در بسته خوردم
از برنامه نویسان محترم میخواهم سورسی را که چنین کاری انجام دهد در اختیار بنده قرار دهند
با تشکر از شما یاران همیشگی
قبلا از اشتراک گذاری سورس زیبای شما پروگرم دولوپرهای باصفا تشکر می جویم

[aliman12]

دوستان به من هم کمک کنید لطفا

[arenaw]

سلام

For i = 0 To List1.ListCount - 1
For j = i + 1 To List1.ListCount - 1
If Val(List1.List(j)) < Val(List1.List(i)) Then
Temp = List1.List(j)
List1.List(j) = List1.List(i)
List1.List(i) = Temp
End If
Next
Next


واسه مرتب کردن نزولی هم شرط داخل حلقه j رو بر عکس کن

[abolfazl-z]

دوست عزیز

شما میتونید از مشخصه Sorted لیست استفاده کنید این مشخصه که در کادر مشخصات لیست وجود داره را با مقدار True مقدار دهی کنید.