Button to add +1 to textbox

Ksmith1192 · Mar 22, 2013

Hi guys,

I have a couple buttons that I need to add +1 to an edittext. But every time I press the + button, it just adds one and doesn't add any more. I need it to go up to 100.

B4X:

Dim Cows As Float
Sub Button1_Click
   edittext1.Text = Cows + Cows + 1
End Sub

NJDude · Mar 22, 2013

B4X:

Dim Cows As Float
Sub Button1_Click
    Cows = Cows + 1
    edittext1.Text = Cows

End Sub

Ksmith1192 · Mar 22, 2013

Numberformat

Thank you!

I do have another question though. How do I get it to where the edittext box has no decimal places. Just whole numbers? I know its something with numberformat() but how would I go about implementing it

NJDude · Mar 22, 2013

If you are just adding 1, then use INT instead of FLOAT.

You can find how to use NumberFormat HERE

Button to add +1 to textbox

Ksmith1192

Member

NJDude

Expert

Ksmith1192

Member

NJDude

Expert

Button to add +1 to textbox

Ksmith1192

Member

NJDude

Expert

Ksmith1192

Member

NJDude

Expert

Privacy & Transparency

Privacy & Transparency