Click по ListBox

[angelina]

Добрый день всем! У меня ListBox c параметром Style, установленном в 1(CheckBox). Элемент листбокса при двойном клике на него выделяется галочкой, а при одинарном только синим цветом. Как мне добиться, чтобы и при одинарном клике соответствующий элемент выделялся галочкой???

[RayShade]

Код: Выделить всё

private sub list1_click()
with list1
.selected(.listindex)=true
end with
end sub


[angelina]

спасибочки