Dim tabs As ABMTabs = page.Component("tabs")
Log("tabs id: " & tabs.ID)
Dim tbl As ABMTable
tbl.Initialize(page, tablename.Text.ToLowerCase, True, False, True, "")
ReloadNewTable(tbl, tablename.Text.ToLowerCase, namelist)
Dim contnew As ABMContainer = BuildTabContainer("cont"&tablename.Text.ToLowerCase, "")
contnew.AddRows(1, True, "").AddCells12(1, "")
contnew.BuildGrid
contnew.Cell(1, 1).AddComponent(tbl)
tabs.AddTab("tab"&tablename.Text.ToLowerCase, tablename.Text, contnew, 3,3,3,12,12,12,True, True, "mdi-hardware-memory", "")
tabs.Refresh
page.Refresh