get-selection in list-control<%>
Returns the index of the currently selected item (items are indexed
from 0). If the choice item currently contains no choices or no
selections, #f is returned. If multiple selections are
allowed and multiple items are selected, the index of the first
selection is returned.