if($lb->selectionIncludes($i) == 1)

##</code><code>##

if($lb2->selectionIncludes($i) == 1)

##</code><code>##

$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' );