简单计算器 指的是用户每输入完一个完整的表达式（一元或者二元）就计算。 

1、设计好界面

2、在Declare Instance Variable里定义三个变量

decimal add1  //存放操作数

3、在数值和小数点按键上双击添加Clicked（）函数内容

if flag=0 then 	sle_1.text=""        flag=1     end if      sle_1.text=sle_1.text+this.text

4、在四个运算符内添加Clicked（）函数内容

choose case  s1    case  '*'        sle_1.text=string(dec(sle_1.text)*add1)          //dec(x)函数的作用是将X值转换为数值型          //string(x) 函数的作用是将X值转换为字符型    case '/'        sle_1.text=string(add1/dec(sle_1.text))    case  '+'        sle_1.text=string(dec(sle_1.text)+add1)    case '-'        sle_1.text=string(add1 - dec(sle_1.text))  end choose   add1=dec(sle_1.text)      //保留第一个输入的数或中间结果   s1=this.text              //保留刚刚按下的运算符   flag=0                    //准备输入下一个数

choose  case s1        case '*'          sle_1.text=string(dec(sle_1.text)*add1)        case '/'          sle_1.text=string(add1/dec(sle_1.text))        case '+'          sle_1.text=string(dec(sle_1.text)+add1)        case '-'          sle_1.text=string(add1 - dec(sle_1.text))     end choose     flag=0     s1=''

工程文件下载地址：