Introduction

The tabs structure consists of an unordered list of tabs. Then when you click on each tab, only the container with the corresponding tab id will become visible. You can set disabled to make a tab inaccessible.

Demo tab text TAB1
Demo tab text TAB2
Demo tab text TAB3
Demo tab text TAB4
Dim tabs As ABMTabs
tabs.Initialize(page, "tabs", "")

// create the tabs As ABMContainer.
tabs.AddTab("tab1", "TAB 1", BuildTabContainer(page, "tab1", "Demo TAB text"),3,3,3,12,12,12,True,False)
tabs.AddTab("tab2", "TAB 2", BuildTabContainer(page, "tab2", "Demo TAB text"),3,3,3,12,12,12,True,True)
tabs.AddTab("tab3", "TAB 3", BuildTabContainer(page, "tab3", "Demo TAB text"),3,3,3,12,12,12,False,False)
tabs.AddTab("tab4", "TAB 4", BuildTabContainer(page, "tab4", "Demo TAB text"),3,3,3,12,12,12,True,False)

// add to row
page.Cell(2,1).AddComponent(tabs)

The code for BuildTabContainer:

public Sub BuildTabContainer(page As ABMPage, id As String, Text As String) As ABMContainer
  Dim Tabc As ABMContainer
  Tabc.Initialize(page, id, "tabpagewhite")

  tabc.AddRows(1,True, "").AddCells12(1,"")
  Dim lbl As ABMLabel
  lbl.Initialize(page, id & "lbl", Text, ABM.SIZE_H5, True, "")
  Tabc.Cell(1,1).AddComponent(lbl)
  Return Tabc
End Sub