e4a计算器源码

非常好用的计算器。 事件 数字1.被单击() 如果 编辑框1.内容 = "0" 则 编辑框1.内容 = "1" 否则 编辑框2.内容 = 编辑框1.内容 编辑框1.内容 = "1" 编辑框1.插入文本(0.0,编辑框2.内容) 结束 如果 结束 事件 事件 数字2.被单击() 如果 编辑框1.内容 = "0" 则 编辑框1.内容 = "2" 否则 编辑框2.内容 = 编辑框1.内容 编辑框1.内容 = "2" 编辑框1.插入文本(0.0,编辑框2.内容) 结束 如果 结束 事件 事件 数字3.被单击() 如果 编辑框1.内容 = "0" 则 编辑框1.内容 = "3" 否则 编辑框2.内容 = 编辑框1.内容 编辑框1.内容 = "3" 编辑框1.插入文本(0.0,编辑框2.内容) 结束 如果