首页

好吧问答库 > 在vb 中只用一个命令按钮，怎么实现text文本框中字符的一个个删除，就像键盘的backspace键的功能，求代码

在vb 中只用一个命令按钮，怎么实现text文本框中字符的一个个删除，就像键盘的backspace键的功能，求代码

2024年11月29日 13:40

有2个网友回答

网友（1）：

Private Sub Command1_Click()
Dim i As Integer

i = Len(Text1.Text)
Text1.Text = Mid(Text1.Text, 1, i - 1)
End Sub

网友（2）：

Private Sub Command1_Click()
If Len(Text1.Text) > 0 Then Text1.Text = Left(Text1.Text, Len(Text1.Text) - 1)
End Sub

相关问答

最新问答

禾晔娘求勾搭！！！

办理减免税备案需要提供什么材料

邮政储蓄银行柜台可以给建设银行卡转账吗……

奥迪q5与英菲尼迪fx35发动机差别

凉席上有虫子怎么办？

我下载的CS1.6都没有userconfig.cfg这个文件。

贷款1万利息6厘，一年利息是多少？怎么算啊？

犬夜叉里有什么好听的轻音乐

我用笔记本玩冠军足球经理0506总自动关机

求一部感动童年的动画片名字，86年左右看过的一部片子，只隐约记得主人公是一个孩子，身边有狼陪伴他。