Public Sub elements()
Combo1.AddItem "COLOR_ACTIVEBORDER"
Combo1.AddItem "COLOR_ACTIVECAPTION"
Combo1.AddItem "COLOR_APPWORKSPACE"
Combo1.AddItem "COLOR_BACKGROUND"
Combo1.AddItem "COLOR_BTNFACE"
Combo1.AddItem "COLOR_BTNTEXT"
Combo1.AddItem "COLOR_CAPTIONTEXT"
Combo1.AddItem "COLOR_INACTIVEBORDER"
Combo1.AddItem "COLOR_INACTIVECAPTION"
Combo1.AddItem "COLOR_MENU"
Combo1.AddItem "COLOR_MENUTEXT"
Combo1.AddItem "COLOR_SCROLLBAR"
Combo1.AddItem "COLOR_WINDOW"
Combo1.AddItem "COLOR_WINDOWFRAME"
Combo1.AddItem "COLOR_WINDOWTEXT"
End Sub