$book = $main->NoteBook()->pack( -side=>'bottom',-fill=>'x', -ipadx=>0, -ipady=>185, -expand=>0 ); $tab3 = $book->add( "Sheet 3", -label=>"Reports", -createcmd=>\&Reports, -raisecmd=>\&Reports, -state=>'normal' );