B4J Question Using B4J for creating business/database apps

Dailson Coelho Machado said:

Hi, from brazil!
What's this?

B4J version: 4.50
Parsing code. Error
Error parsing program.
Error description: Undeclared variable 'co' is used before it was assigned any value.
Occurred on line: 34 (Main)
New=co.Left(New,New.Length-1)

Variable : New=co.Left(New,New.Length-1)

Click to expand...

It's a mistake, it was probably meant to be New.Left or Old.Left, or the rest of the code was not posted.

my contribution

Dim co As JStringFunctions 'lib JStringFunctions v 1.0



Sub txtField1_TextChanged (Old As String, New As String)

'NUMERO 000.00
If New.Length = 3 And cc=0 Then
New = New & "."
txtField1.Text = New
'New=co.Left(txtField1.Text,3)
cc=3
End If
If New.Length > 5 And cc=3 Then
Dim res As Float
res = txtField1.Text
txtField1.Text = NumberFormat(res,0,2)
cc=0
ed2.RequestFocus 'PROX. EDIT_FIELD
End If
txtField1.SetSelection(txtField1.Text.Length, txtField1.Text.Length)

end sub