رفتن به مطلب
  • 0

چگونه در تکست باکس به خط بعدی برویم؟


ali2016

سوال

سلام یه برنامه ساختم  که با زدن  دکمه a یک عدد رو به تکست باکس اضافه میکنه
و با زدن همون دکمه عدد داخل تکست باکس + 1 میشه  
مثلا اگر عدد 14 باشه با زدن دکمه A  عدد 15 میشه.
من میخوام این عدد در خط بعدی تکست باکس قرار بگیره 
و عدد قبلی پاک نشه  مثلا به این صورت
14
15
16

ممنون میشم اگر کمکم کنید

لینک ارسال
به اشتراک گذاری در سایت های دیگر

3 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

سلام

از StringBuilder  برای این مواقع می تونید استفاده کنید.البته بدون اون هم میشه ولی خب راحت تر هستش.

Sub BtnRun_Click
	Dim sb As StringBuilder
	sb.Initialize
	a = a + 1
	sb.Append(a).Append(CRLF)
	edtNumber.Text = edtNumber.Text & sb.ToString
End Sub

 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

ممنونم از جوابی که دادین
با این کد به خط بعدی رفت ولی مشکل اینجاست که عددی که من میخوام رو نمایش نداد
عدد من طولانیه

مثلا 4555555555  این عدد رو وقتی به اضافه 1 میکنیم باید بشه 4555555556 ولی میشه 260588260

 

خودم میدونم این تقریبا غیر ممکنه ولی این اتفاق میوفته دقیقا
اینم کد های من
 


Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.

	Private EditText1 As EditText
	Private Button1 As Button
	Dim A As Int	
	Dim B As Int
	
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("Layout1")
Activity.LoadLayout("LAY1")
Activity.Color = Colors.White
	A = 4555555555
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub


Sub Button1_Click
	
	
	
	Dim sb As StringBuilder
	sb.Initialize
	B = a + 1
	A = B
	sb.Append(A).Append(CRLF)
	EditText1.Text = EditText1.Text & sb.ToString
	
	
	
	
	
End Sub

 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

سلام

محدوده Integer  از چیزی که تعریف کردید کمتر هستش.

    Byte : 1byte signed: -128 to 127
    Char : 2bytes unsigned: 0 to 65535 : not all values are valid Unicode code points
    Short : 2bytes signed: -32768 to 32767
    Int : 4bytes signed: -2147483648 to 2147483647
    Long : 8bytes signed: -9,223,372,036,854,775,808 to 9,223,372,036,854,775,807 (9.2...E+18)
    Float : 4bytes +/- 3.4e +/- 38 (~7 digits)
    Double : 8bytes +/- 1.7e +/- 308 (~15 digits)
     

 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...