Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
Activity.LoadLayout("Layout1")
Dim bm As BitmapDrawable
bm.Initialize(LoadBitmap(File.DirAssets,"ic_action_android.png"))
ib1.Text = "Android"
ib1.IconPadding = 50
ib1.TextColor = Colors.Blue
'ib1.setPadding
ib1.setIcon(True,bm)
Dim bm As BitmapDrawable
bm.Initialize(LoadBitmap(File.DirAssets,"ic_action_achievement.png"))
ib2.Text = "Button"
ib2.IconPadding = 50
ib2.setIcon(False,bm)
Dim bm As BitmapDrawable
bm.Initialize(LoadBitmap(File.DirAssets,"ic_action_barcode_2.png"))
ib3.Text = ""
ib3.IconPadding = 0
ib3.setIcon(False,bm)
End Sub
[..]
Sub IconButton1_Click()
Dim bm As BitmapDrawable
bm.Initialize(LoadBitmap(File.DirAssets,"ic_action_android.png"))
ib3.setIcon(True,bm)
End Sub
Sub IconButton2_Click()
Dim bm As BitmapDrawable
bm.Initialize(LoadBitmap(File.DirAssets,"ic_action_achievement.png"))
ib3.setIcon(True,bm)
End Sub