my $vbox = Wx::BoxSizer->new( wxVERTICAL );