اطلاعیه

کاربر گرامی

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

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


mrabay

عدم استفاده از حروف لاتین در ادیت تکست

4 ارسال در این موضوع قرار دارد

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

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

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


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

سلام

به نظر بنده تنها راهش همون کدهای اسکی هست که محدوده کدهای اسکی حروف الفبای لاتین و اعداد لاتین رو توسط دستورات شرطی ف - ی - ل - تر کنید!

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


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
در در 1397/08/13, 11:41:22، mrabay گفته است :

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

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

سلام 

از این استفاده کن

Sub edt_TextChanged (Old As String, New As String)
	If New.Length>0 Then
	Dim ascii As Int=Asc( New.CharAt(New.Length-1))
	If ascii>64 And ascii<122 Then
	
			edt.Text=New.SubString2(0,New.Length-1)
	End If
	End If
End Sub

 

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


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

مطالب شما نیاز است به تایید مدیران برسد

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

×   شما در حال چسباندن محتوایی با قالب بندی هستید.   حذف قالب بندی

  تنها استفاده از ۷۵ اموجی مجاز می باشد.

×   لینک شما به صورت اتوماتیک جای گذاری شد.   نمایش به عنوان یک لینک به جای

×   محتوای قبلی شما بازگردانی شد.   پاک کردن محتوای ویرایشگر

×   شما مستقیما نمی توانید تصویر خود را قرار دهید. یا آن را اینجا بارگذاری کنید یا از یک URL قرار دهید.