Advertisement
ASP_Volume2 String Manipulation #38841

_String Auto Backspace_

With this extremely easy code, you can erase a character at the end of a string or in a textbox with a click of a button. Very easy code and every line is commented. DON'T forget to vote.

AI

สรุปโดย AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

ซอร์สโค้ด
original-source
Dim backlength As Integer 
'declare the variable in which the length will be stored
Dim backString As String 
'declare the string in which Text1 wil be stored
Private Sub Command1_Click()
backlength = Len(Text1.Text) 
'find the length of the text in the textbox
backString = Mid(Text1.Text, 1, (backlength - 1)) 
'save that text without the last character into the string
Text1.Text = backString 
'display the string in the text box
End Sub
'You can replace Text1.Text with a string name
ความคิดเห็นดั้งเดิม (3)
กู้คืนจาก Wayback Machine