powerbuilder怎么写个计算器

是一个使用PowerBuilder编写的计算器的示例代码：

// 声明变量
decimal add1 // 存放操作数
char s1 // 存放操作符
int flag // 判断计算是否完成（0为初始状态，1为计算中，2为计算完成）

// 数字按钮Clicked事件
// 0-9和点的按钮Clicked事件代码一样
if flag = 0 then
    sle_2.text = "" // 清空sle_2.text文本框的内容
    flag = 1
end if

// 如果不判断的话，你在第一次点击=按钮后，不点ce按钮，直接开始第二次计算，
// 文本框上显示的数值会是你第一次计算出的结果和你刚点击的数值，拼接在一起显示；
// （第一次计算的结果是10，你点击了3，文本框就显示103）
if s1 = "=" then
    sle_1.text = " "
    s1 = ""
end if

sle_1.text = sle_1.text + this.text
sle_2.text = sle_2.text + this.text

// 操作符按钮Clicked事件
// (+,-,*,/,=)按钮代码一样
choose case s1
    case '*'
        sle_2.text = string(dec(sle_2.text) * add1)
    case '/'
        sle_2.text = string(add1 / dec(sle_2.text))
    case '+'
        sle_2.text = string(dec(sle_2.text) + add1)
    case '-'
        sle_2.text = string(add1 - dec(sle_2.text))
end choose

add1 = dec(sle_2.text) // 保留中间结果
s1 = this.text // 保留刚刚按下的运算符
flag = 0 // 准备输入下一个数
sle_1.text = sle_1.text + this.text

// CE清除按钮Clicked事件
add1 = 0
s1 = ''
flag = 0
sle_1.text = ''
sle_2.text = ''