VB如何用一个键实现backspace功能

2024-12-01 23:24:31

推荐回答（4个）

回答1：

Private Sub Command1_click()
text1.text=left(text1.text,len(text1.text)-1)
End Ssub
回答者： lxz1969 - 首席运营官十二级 9-26 11:47

这个就行

回答2：

Lock 属性为 Ture，你怎么 BackSpace？

if text1.selectlenth=0 thne
if text1.selectstart<>0 then
text1.selectstart=text1.selectstart-1
text1.selectlenth=1
text1.selecttext=""
else
exit sub
endif
else
text1.selecttext=""
endif

回答3：

Private Sub Command1_click()
text1.text=left(text1.text,len(text1.text)-1)
End Ssub

回答4：

楼上的就可以