-textvariable => \${$ComboBoxName},
-choices => \@{$ComboBoxName."List"},
-browsecmd =>\&{"on".$ComboBoxName."ComboBoxSelect"}