Sub Globals()
Dim edtID, edtFullName, edtPostcode, edtGP As EditText
Dim btnFirst, btnLast, btnFind, btnShowNext, btnPrevious, btnNext As Button
Dim lblRowCount As Label
Dim ACToolBarDark1 As ACToolBarDark
End Sub
Sub Activity_Create(FirstTime As Boolean)
ACToolBarDark1.Initialize("ACToolBar")
ACToolBarDark1.LogoBitmap = LoadBitmap(File.DirAssets, "Test.png")
'etc. etc.
End Sub