sure thing, I added it below.
The error happens at the line:
"geometricBtn.Initialize("geometricBtn")"
here is the code
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
End Sub
Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
'layout related variables
Dim clearLbl As Label
Dim aboutLbl As Label
Dim exitLbl As Label
Dim mainScroll As ScrollView
'geometric altitude gui
Dim geometricPnl As Panel
Dim geometricLbl As Label
Dim geometricEdit As EditText
Dim geometricBtn As Spinner
'gui constants
Dim panelHeight As Int = 35dip 'scroll view added panels constant measurements
Dim panelVerticalDist As Int = 2dip 'vertical distance between panels
Dim panelScreenDist As Int = 2dip 'horizontal distance between panels and screen borders
End Sub
Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
Activity.LoadLayout("main")
'local variables
Dim i As Int = 0
'add geometric altitude gui
geometricPnl.Initialize("")
geometricPnl.Color = Colors.rgb(206, 206, 206)
mainScroll.Panel.AddView(geometricPnl, panelScreenDist, i * (panelVerticalDist + panelHeight), 100%x - 2 * panelScreenDist, panelHeight)
geometricLbl.Initialize("geometricLbl")
geometricLbl.TextSize = 15
geometricLbl.TextColor = Colors.black
geometricLbl.Color = Colors.rgb(206, 206, 206)
geometricLbl.Text = "Geometric altitude"
geometricLbl.Gravity = Bit.OR(Gravity.CENTER_VERTICAL, Gravity.LEFT)
geometricPnl.AddView(geometricLbl, 0, 0, 50%x, panelHeight)
geometricEdit.Initialize("geometricEdit")
geometricEdit.TextSize = 15
geometricEdit.TextColor = Colors.black
geometricEdit.Color = Colors.rgb(206, 206, 206)
geometricEdit.Gravity = Gravity.FILL
geometricEdit.Hint = "..."
geometricEdit.HintColor = Colors.DarkGray
geometricEdit.InputType = geometricEdit.INPUT_TYPE_NUMBERS
geometricPnl.AddView(geometricEdit, 50%x, 0, 75%x, panelHeight)
geometricBtn.Initialize("geometricBtn")
geometricBtn.TextSize = 15
geometricBtn.TextColor = Colors.Black
geometricBtn.Color = Colors.rgb(206, 206, 206)
geometricBtn.AddAll(Array As String("m", "ft"))
geometricBtn.DropdownBackgroundColor = Colors.rgb(206, 206, 206)
geometricBtn.DropdownTextColor = Colors.Black
geometricBtn.SelectedIndex = 0
geometricBtn.Prompt = "geometric altitude dimension"
geometricPnl.AddView(geometricBtn, 75%x, 0, 100%x, panelHeight)
i = i + 1
end sub