If OpenWindow(0, 100, 0, 1000, 600, "")

  PanelGadget(990,0,25,1000,530)
 
  AddGadgetItem(990, -1, "1");1-я вкладка панели
  AddGadgetItem(990, -1, "2"); 
  AddGadgetItem(990, -1, "3");
  AddGadgetItem(990, -1, "4"); 
  AddGadgetItem(990, -1, "5") 
   AddGadgetItem(990, -1, "6"); 
   AddGadgetItem(990, -1, "7"); 
   AddGadgetItem(990, -1, "8")  
   AddGadgetItem(990, -1, "9")
   AddGadgetItem(990, -1, "10");10-я вкладка панели
   
 ButtonGadget(100,20,0,60,20,"1")
 ButtonGadget(101,90,0,40,20,"2")
 ButtonGadget(102,130,0,50,20,"3")
 ButtonGadget(103,180, 0,32, 20,"4")
 ButtonGadget(104,212, 0,32, 20,"5")
 ButtonGadget(105,244, 0,55, 20,"6")
 ButtonGadget(106,299, 0,55, 20,"7")
 ButtonGadget(107,354, 0,55, 20,"8")
 ButtonGadget(108,409, 0,32, 20,"9"
 EndIf
 
 Repeat
 Select WaitWindowEvent()
  Case #PB_Event_CloseWindow
   Break
 EndSelect  
ForEver
End