我做了个计算器但是不知道怎么才能做到把最后一个字符删掉啊？？？？？

题意不明

打入冷宫

什么哦　就是　我做了计算器然后　设定了个按钮作为删除　text1里的最后一个字符用

可是我不会编

text1.text=mid(text1.text1,1.len(text1.text)-1)

不明白

Dim DisLabel As String, count As Integer
        'get to know how many digits are there
        count = Me.Label1.Text.Length
        'count-1 is the index, romove last one digit only
        DisLabel = Me.Label1.Text.Remove(count - 1, 1)
        'redisplay it in your calculator's screen
        Me.Label1.Text = DisLabel

bw_william 写的很明确阿！！

我是新手，大家多指教