Sub Calls - can I send an Edit Field

[drj]

I am converting a vb routine to your environment.

I have the following utility that I use to get data from text boxes. It appears that I cannot pass your ebittext object in a routine? can you help?

Sub getText(ByRef TB As EditText ) As Double

Try

getText = CSng(TB.Text)
Catch ex As Exception
getText = 0

End Try

End Sub

 

[agraham]

Sub getText(edit As EditText) As Int
   Try
      Return edit.Text
   Catch
      Return 0
   End Try
End Sub

Note that Basic4android will try to coerce primitive types for you so this Sub will coerce the String type of the Text property to the Int type to return.

 

[drj]

Hi Thanks , I have a question on that

Hi Can I do this. I want to return a double from the call. The idea is to convert the text in the edit field to a floating point number?



Sub getText(TB As EditText ) As Double

Try

getText = CSng(TB.Text)
Catch ex As Exception
getText = 0

End Try

End Sub

 

[agraham]

That's VB code you posted, not Basic4android code. Just declare the return type as Double in the Sub I posted above.