|
地板

楼主 |
发表于 2012-8-31 20:20:48
|
只看该作者
空间 计算器
//定义默认空间
字符型 点击字符,运算操作前字符
逻辑型 加,减,乘,除
逻辑型 计算加,计算减,计算乘,计算除
功能 逻辑型 按钮2_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"1")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮9_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"0")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮4_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"9")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮3_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"8")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮0_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"7")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮1_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"4")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮5_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"5")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮6_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"6")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮7_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"3")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮8_点击()
//这里添加你要执行的代码
如果(加)
点击字符=""
加=假
如果结束
点击字符=字符串.连接(点击字符,"2")
编辑框.设置文本("编辑框0",点击字符)
返回 真
功能结束
功能 逻辑型 按钮10_点击()
//这里添加你要执行的代码
运算操作前字符=编辑框.获得文本("编辑框0")
加=真
计算加=真
返回 真
功能结束
功能 逻辑型 按钮12_点击()
//这里添加你要执行的代码
如果(计算加)
字符型 被加数
被加数=编辑框.获得文本("编辑框0")
整型 加的结果
加的结果 = 转换.字符型转整型(运算操作前字符) + 转换.字符型转整型(被加数)
编辑框.设置文本("编辑框0",转换.整型转字符型(和))
计算加=假
如果结束
返回 真
功能结束
空间结束
//空间结束语句
这是全部,有点多 |
|