Код

Попытка
  АктивИск_ПанельЗакладок = СоздатьОбъект("АктивИкс");
  АктивИск_ПанельЗакладок.УстановитьАтрибут(Форма,"ПанельЗакладок");
  АктивИск_ПанельЗакладок.СоздатьЭУ("MSComctlLib.TabStrip.2");
  ОбъектПанельЗакладок = АктивИск_ПанельЗакладок.Объект;
Исключение
  Сообщить("Ошибка: "+ОписаниеОшибки(),"!");
КонецПопытки;
 

Код

rollout testTabs "Test Tabs" (
activeXcontrol ax_tabs "MSComctlLib.TabStrip.2" height:20
subRollout theSubRollout height:180
on ax_tabs Click do
(
 case ax_tabs.SelectedItem.index of
 (
  1: (
   removeSubRollout theSubRollout secondRollout
   addSubRollout theSubRollout firstRollout
  )
  2: (
   removeSubRollout theSubRollout firstRollout
   addSubRollout theSubRollout secondRollout
  )
 )
)
on testTabs open do
(
ax_tabs.tabs[1].caption = "First Tab"
ax_tabs.tabs.add pvCaption:"Second Tab"
)