(label '.lab1 :text "This is a label1" :relief "sunken")
(pack .lab1)