sub get_mlistbox_choice_index{ ... }

...->activate(get_mlistbox_choice_index(...));