1. Свойство списка Multiselect = Simple или Extended (можно задать в конструкторе);
2. После выделения в списке нескольких строк, пройтись по свойству ItemSelected:
Dim S as String
Dim i
For Each i In ВашСписок.ItemSelected
S = S & ВашСписок.Column(0, i) & "; "
Next i
|
Результат -- строка, содержащая эл-ты 1-го столбца, выделенных строк списка, разделенных точкой с запятой.
Пробуйте!