رفتن به مطلب
برای استفاده از انجمن و عضـویت کلیک کنید.

AnswerCenter

مرکز پاسخگویی به سوالات برنامه نویسی

درخواست سفارش پروژه

اطلاعیه

کاربر گرامی

به انجمن برنامه نویسی AnswerCenter.ir خوش آمدید

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


بایگانی شده

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

نورنما

یافتن آخرین حرف تایپ شده در edittext حتی اگر در وسط متن تایپ بشه

پست های پیشنهاد شده

نورنما    549

کاربر فعال

سلام به دوستان انجمن 

با این کد ساده ولی بسیار کاربردی که خیلی جا ها به درد میخوره !  میتونید آخرین حرف تایپ شده در edittext رو حتی وقتی در بین متن ها یک حرف جدید تایپ بشه رو به راحتی مشخص و استفاده نمایید .

 

Sub edittext1_TextChanged (Old As String, New As String)

Dim Akharin_harf_taypi As String 					
''استفاده از محل کروسر ومکان نما
if edittext1.SelectionStart>=1 then Akharin_harf_taypi= new.SubString2(edittext1.SelectionStart-1,edittext1.SelectionStart)


'نمایش آخرین حرف تایپ شده حتی اگر در وسط متن تایپ شده  باشد
log (Akharin_harf_taypi)

end sub 

 

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


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

×
×
  • جدید...