Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
'Activity.LoadLayout("Layout1")
'ACTION DRAWER
OverflowItems.Initialize
OverflowItems.Add("item1")
OverflowItems.Add("item2")
*************************************************************************************************************
'AD.Initialize("", "icon.png", True, Colors.RGB(100,100,100), "Dark", True, True, True, OverflowItems, "Drawer", Activity, Main)
'AD.AddAction("WhatsApp", "WhatsApp_Click", "whatsapp.png")
*************************************************************************************************************
WhatsApp_Click
End Sub