حذف اسپیس از اخر کلمات ادیت تکست

[Siaic 88]

سلام

یه ادیت تکست دارم و یک باتن

میخوام وقتی باتن زده شد اگر اخر کلمه ادیت تکست فضای خالی (اسپیس) داشت حذف کنه و در نظر نگیره

ممنون اکه راهنماییم کنید تشکر

[Farzad Musavi 576]

dim m as string="test "
If m.SubString(m.Length-1) =" " Then
	m=m.SubString2(0,m.Length-2)
	Log("eslah shod")
End If
	Log(m)

 

[softir 459]

در هم اکنون، Siaic گفته است :

سلام

یه ادیت تکست دارم و یک باتن

میخوام وقتی باتن زده شد اگر اخر کلمه ادیت تکست فضای خالی (اسپیس) داشت حذف کنه و در نظر نگیره

ممنون اکه راهنماییم کنید تشکر

این طوری بنویس

EditText1.Text = EditText1.Text.Trim

 

[Siaic 88]

ممنون از هر 2 بزرگوار

پاسخ آقای softir کارامد تر چون تمام اسپیس ها حذف میشه و اگر کاربر چندین اسپیس وارد کنه هیچ مشکلی پیش نمیاد

 

بازم ممنون از هر2 عزیز