C按钮的命令可用 text1.text=left(text1.text,len(text1.text)-1)
CE按钮的命令可用 text1.text=""
CE button's click_event should be :
text1.text = "0"
and notice: Get the value of textbox must change its type string to value....
在text1的keypress事件中输入限制,如下:
private sub text1_keypress()
if text1.text="0" and text1.keychar="0" then text1.handled=true
'当文本框内容是"0"且用户输入又是"0",则输入的数据不提交给文本框
end sub