مشخص شدن تعداد کاراکتر های edit text

[shahab1392 47]

با عرض سلام

 

دوستان چطور میشه تعداد کاراکتر های  edit text رو داخل یک لیبل بیارم و نشونش بدم که داخل این edittext مثلا 10 تا کاراکتر هستش

 

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

[امین شاهدی 5,773]

با عرض سلام

 

دوستان چطور میشه تعداد کاراکتر های  edit text رو داخل یک لیبل بیارم و نشونش بدم که داخل این edittext مثلا 10 تا کاراکتر هستش

 

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

Dim EditText1 As EditText
Dim label1 As Label


label1.Text="تعداد کاراکتر ها برابر است با : " & EditText1.Text.Length

[shahab1392 47]

مرسی ممنون از راهنمایی

حالا اگه بخواهیم کاری کنیم که edit text مثلا فقط 10 کاراکتر داخلش نوشته بشه و بیشتر از اون دیگه چیزی داخلش نوشته نشه چکار باید کرد

[امین شاهدی 5,773]

مرسی ممنون از راهنمایی

حالا اگه بخواهیم کاری کنیم که edit text مثلا فقط 10 کاراکتر داخلش نوشته بشه و بیشتر از اون دیگه چیزی داخلش نوشته نشه چکار باید کرد

 

ایونت Edittext رو به اینجوری استفاده کنین:

Sub EditText1_TextChanged (Old As String, New As String)
	If New.Length>10 Then
	 EditText1.text=Old
	 Else
	 'kar hai ke mikhain anjam she
	End If
End Sub

[پژمان نیکروان 6,055]

مرسی ممنون از راهنمایی

حالا اگه بخواهیم کاری کنیم که edit text مثلا فقط 10 کاراکتر داخلش نوشته بشه و بیشتر از اون دیگه چیزی داخلش نوشته نشه چکار باید کرد

تو رویداد تکست چنچ میتونی بنویسی:

Sub edittext1_TextChanged (Old As String, New As String)
	If New.Length>10 Then
	edittext1.Text=Old
	ToastMessageShow("شما بیشتر تر 10 کاراکتر نمیتونید بنویسید",False)
	End If
End Sub

[پژمان نیکروان 6,055]

امین جان پاسخ شما رو ندیدم شرمنده