首页

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

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

2024-11-29 13:40:20

推荐回答（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

相关问答

最新问答

C语言中，数组在内存中占一片（）的存储区，由（）代表它的首地址

汽车库设计规范中车辆出入口的宽度，双向行驶时不应小于7m，单向行驶时不应小于4m，

世界历史上第一个奴隶制国家怎样形成的？

我想买一辆自卸车，用来拉石子、黄沙，载重大概在50吨左右，不知选哪个品牌好，什么型号，购车款大概多少

高考考大专好还是体育大学好

郑州到西安有多少公里？

求口袋妖怪黑白2 汉化版要中文的，看到官方出日文的了可惜都看不懂，有木有汉化好的？如果满意我给高分

跪求结婚吉日。男1981农历八月初二，女1989农历腊月十一，求结婚吉日

从诸城到日照~~~~！做汽车要多久多少钱~！

在手机管家里面删除了一些手机相册中保留的照片，怎么恢复那些照片呢