1) при AddItem проверять, нет ли уже в ListBox такого значения и добавлять только в том случае, если вводимое является уникальным
2) дополнительно к Sorted, нужно свойство SortRevers, то есть сортировка в обратном порядке. То есть нужно чтоб сортировка вообще включалась/отключалась (Sorted=True/False) и если сортировка включена, чтоб сортировало так, как диктует SortRevers=True/False (обратная/прямая сортировка).
Проблема собсно, в чём - написать несколько строк проверки уникальности я могу сам, но никак не могу понять куда мне её вписывать, прочёл кучу всяких текстов по созданию контролов, Эскина того же, но, что поделаешь - тупой видимо, никак не могу создать листбокс! Отсюда две просьбы:
1)Не может ли кто-нибудь сделать так сказать "шаблон" пользовательского ListBox контрола из обычного ListBox и указать внутри где мне вставить проверку уникальности. Вроде это для знающего человека совсем несложно. Типа :
- Код: Выделить всё
Private Sub CheckUnique()
"Здесь, дебилоид, должен быть твой код! Смотри не напутай!"
End Sub
2)Можете ли посоветовать как реализовать обратную сортировку - то есть не сам код прошу (обратную сортировку и перемещение элементов списка я знаю как сделать), а подходы какие могут быть, не совсем представляю логику работы обратной сортировки (особенно в связи со свойством Sorted=True/False), когда она должна происходить? Свойство Sorted должно быть видимо False?
То есть я как представляю, если я хочу сделать обратную сортировку, сперва должно устанавливаться Sorted=True (отсортировалось нормально), затем Sorted=False и только после этого я манипулирую с элементами списка для сортировки в оьратном порядке, да? или бред?
Заранее благодарен!