Backspace

[sunstar]

سلام براساتید گرامی
آیا می توان یک label در کنار textbox یک userform ایجادکرد که نقشbackspace را ایفا کند طوری که کلمات داخل textbox را حرف به حرف از چپ به راست پاک کند؟ با تشکر

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[iranweld]

با سلام

براحتی امکان پذیر است

Private Sub CommandButton1_Click()
xx = Len(TextBox1)
If xx > 0 Then
TextBox1 = Left(TextBox1, xx - 1)
End If
End Sub