Sub ButtonSettings_Click
strNameOfCurrentActivity = "settings"
Activity.LoadLayout("settings")
PanelSettings.SetBackgroundImage(LoadBitmap(File.DirAssets, "IMG_0327.jpg"))
' Make the panel the same size as the activity.
'----------------------------------------------
PanelSettings.Width = Activity.Width
PanelSettings.Height = Activity.Height
End Sub