public Sub ConnectPage()
'NEW
ABMShared.ConnectNavigationBar(page)
Dim acb1 As ABMActionButton
acb1.Initialize(page, "acb1", "mdi-action-shop", "", "bigblue")
acb1.MainButton.size = ABM.BUTTONSIZE_LARGE
acb1.MainButton.SetTooltip("I'm a tool tip1", "left", 1000 )
' the sub buttons
Dim btn1 As ABMButton
btn1.InitializeFloating(page, "btn1", "mdi-social-share", "sub1")
btn1.SetTooltip("I'm a tool tip4", "top", 1000 )
acb1.AddMenuButton(btn1)
Dim btn2 As ABMButton
btn2.InitializeFloating(page, "btn2", "mdi-social-whatshot", "sub2")
btn2.SetTooltip("I'm a tool tip3", "left", 1000 )
acb1.AddMenuButton(btn2)
Dim btn3 As ABMButton
btn3.InitializeFloating(page, "btn3", "mdi-social-notifications", "sub3")
btn3.SetTooltip("I'm a tool tip2", "left", 1000 )
acb1.AddMenuButton(btn3)
' add to page
page.AddActionButton(acb1)