|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
这是我按着教程里写的 但是最后清除的时候是归0了 但是在输入的时候就出现以前的了
空间 计算器
//定义默认空间
字符型 点击字符,运算操作前字符
逻辑型 加,减,乘,除
逻辑型 计算加,计算减,计算乘,计算除
逻辑型 清除
功能 逻辑型 按钮10_点击()
//这里添加你要执行的代码
点击字符=字符串.连接(点击字符,"0")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮2_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"00")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮7_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"1")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮11_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"2")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮9_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"3")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮4_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"4")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮5_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"5")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮6_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"6")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮1_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"7")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮8_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"8")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮3_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
如果(减)
点击字符=""
减=假
如果结束
如果(乘)
点击字符=""
乘=假
如果结束
如果(除)
点击字符=""
除=假
如果结束
点击字符=字符串.连接(点击字符,"9")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮13_点击()
//这里添加你要执行的代码
运算操作前字符=编辑框.获得文本("编辑框0")
加=真
计算加=真
返回 真
功能结束
功能 逻辑型 按钮14_点击()
//这里添加你要执行的代码
运算操作前字符=编辑框.获得文本("编辑框0")
减=真
计算减=真
返回 真
功能结束
功能 逻辑型 按钮12_点击()
//这里添加你要执行的代码
如果(计算加)
字符型 被加数
被加数=编辑框.获得文本("编辑框0")
整型 加的结果
加的结果=转换.字符型转整型(运算操作前字符,0)+转换.字符型转整型(被加数,0)
编辑框.设置文本("编辑框0",转换.整型转字符型(加的结果))
计算加=假
如果结束
如果(计算减)
字符型 减数
减数=编辑框.获得文本("编辑框0")
整型 减的结果
减的结果=转换.字符型转整型(运算操作前字符,0)-转换.字符型转整型(减数,0)
编辑框.设置文本("编辑框0",转换.整型转字符型(减的结果))
计算减=假
如果结束
如果(计算乘)
字符型 乘数
乘数=编辑框.获得文本("编辑框0")
整型 乘的结果
乘的结果=转换.字符型转整型(运算操作前字符,0)*转换.字符型转整型(乘数,0)
编辑框.设置文本("编辑框0",转换.整型转字符型(乘的结果))
计算乘=假
如果结束
如果(计算除)
字符型 除数
除数=编辑框.获得文本("编辑框0")
整型 除的结果
除的结果=转换.字符型转整型(运算操作前字符,0)/转换.字符型转整型(除数,0)
编辑框.设置文本("编辑框0",转换.整型转字符型(除的结果))
计算除=假
如果结束
返回 真
功能结束
功能 逻辑型 按钮16_点击()
//这里添加你要执行的代码
运算操作前字符=编辑框.获得文本("编辑框0")
除=真
计算除=真
返回 真
功能结束
功能 逻辑型 按钮15_点击()
//这里添加你要执行的代码
运算操作前字符=编辑框.获得文本("编辑框0")
乘=真
计算乘=真
返回 真
功能结束
功能 逻辑型 按钮0_点击()
//这里添加你要执行的代码
编辑框.设置文本("编辑框0","0")
返回 真
功能结束
空间结束
//空间结束语句
|
|