Sub Class_Globals
Private cbLanguage As B4XComboBox
End Sub
Private Sub B4XPage_Created (Root1 As B4XView)
B4XPages.GetManager.LogEvents = True
Root = Root1
Root.LoadLayout("PageSettings")
Languages
End Sub
Private Sub Languages()
cbLanguage.SetItems(Array("Kazakh", "Russian", "English"))
Log("Creating ComboBox")
End Sub