never one to shy away from answering my own question
i've brought you all a version of a solution to the
'listbox problem'
i have been working through the debug process on this problem and think i have an answer ...
Change the subroutine TheListBox_Click to TheListBox_GotFocus:
sub TheListBox_GotFocus {
my $ListSelection = $theListBox->SelectedItem();
print ",$ListSelection\n";
}
hope this helps :)!