سوال درمورد لیست بوکس vb6

[site-111]

سوال من این هست که من یک لیست دارم که میخوام تو همون لیست کلمات تکراری حذف بشه. با تشکر راهنمایی کنید . ممنون....:قلب:

[ASedJavad]

خصوصيت Sorted ليستت True هست يا False؟

[site-111]

خصوصيت Sorted ليستت True هست يا False؟

False هست.

[site-111]

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

[mostafa_bahar]

حواست کجاست تاپیک دیگه رو نگاه کن که ساختی

[IamOverlord]

این سوال بیشتر مربوط به الگوریتم نویسی میشه تا VB6.
چون خاصیت Sorted = False پس اول اعضای لیست رو میریزی داخل یه آرایه ی A. بعد اعضای تکراری A رو حذف می کنی و میریزی تو آرایه ی مثلا B. حالا روش حذف کردن اعضای تکراری این هستش که هر دفعه که یه عضو از A به B انتقال پیدا می کنه ببینی تو B بوده یا نه...

[r0ot$harp]

دوست عزیز نمونه ای ساده هست این کد اما بهتون کمک می کنه :


Private Sub Form_Load()
ListViewKillDupes


End Sub
Public Sub ListViewKillDupes()
Dim Search1 As Long
Dim Search2 As Long
Dim KillDupe As Long
KillDupe = 0
For Search1& = 0 To ListView1.ListCount - 1
For Search2& = Search1& + 1 To ListView1.ListCount - 1
KillDupe = KillDupe + 1
If ListView1.List(Search1&) = ListView1.List(Search2&) Then
ListView1.RemoveItem (Search2&)
Search2& = Search2& - 1
End If
Next Search2&
Next Search1&
End Sub


در ضمن نگاهی به این صفحه هم بندازین .
http://social.msdn.microsoft.com/forums/en-US/vbgeneral/thread/0799668c-36dd-42d9-9599-3085a6c0581f/

باتشکر احسان

[site-111]

دوسته عزیز من برایه لیست بوکس میخوام...این کد که شما گذاشتی برایه لیست ویو است... اگر میشه یک پروژه برایه لیست بوکس بزارید .سپاس
در لیست بوکس من کلمه هایی چند بار تکرار شدن که میخوام یکی از آن کلمه بمونه و بقیه تکراری هایه کلمه پاک بشه..

[r0ot$harp]

دوسته عزیز من برایه لیست بوکس میخوام...این کد که شما گذاشتی برایه لیست ویو است... اگر میشه یک پروژه برایه لیست بوکس بزارید .سپاس
در لیست بوکس من کلمه هایی چند بار تکرار شدن که میخوام یکی از آن کلمه بمونه و بقیه تکراری هایه کلمه پاک بشه..


دوست عزیز شما هنوز زحمت تست سورس رو نکشیدین . این بی احترامی تمام نسبت به ...

اسم اون ListView1 اما برای ListBox .

می خوام بدونم ListView متدی به نام ListCount داره ؟:قهقهه:


باتشکر احسان