Dim section1aButton0 As ABMButton
section1aButton0.InitializeFlat(page,"section1aButton0","","","LOCATION : All Locations","v3Button0")
section1aButton0.HTMLAddClass("smallradius")
section1aButton0.Size = ABM.BUTTONSIZE_LARGE
section1aButton0.DropdownShowBelow = True
section1aButton0.SetBorder(ABM.COLOR_WHITE,ABM.INTENSITY_DARKEN4,1,ABM.BORDER_SOLID)
section1aButton0.UseFullCellWidth = True
section1aButton0.AddMenuItem("ALL","All Locations")
For myLoop = 0 To myComboList.Size-1
Dim thisName As String = myComboList.GetKeyAt(myLoop)
Dim thisLine As String = thisName
section1aButton0.AddMenuItem(thisName,thisLine)
Next