مشکل در int

[Elyas Erfani 3,582]

سلام خدمت اساتید بیسیک فور اندروید

 

 

ببخشید من ی مشکل داشتم

Sub Globals
Private Label1 As Label
End Sub

Sub BtnPlus_Click
Dim i As Int
i = 1
	Label1.Text = Label1.Text + i
End Sub

اینجا میخوام یکی ب عدد لیبلم اظافه بشه
اما این شکلی میشه :
2.0
3.0
4.0


ممیز داره و بعد عددم صفر میاد

میخوام فقط عدد صحیح باشه بدون ممیز باید چیکا کنم دوستان ؟

[مهدی ایزدی 9,203]

درود

این کد نباید مشکلی داشته باشه :

Sub Globals
Private Label1 As Label
Dim i As Int = 1
End Sub

Sub BtnPlus_Click
	Label1.Text = i
	i = i + 1
End Sub

و جواب هارو باید به صورت :

1

2

3

4

5

6

...

نمایش بده !