TC官方合作论坛

标题: 新手,这是自己设计出的一个简单计算器代码,觉得有很多不足,请大家看看里面的代码有哪些能够改进的地方,感激不尽! [打印本页]

作者: qwe527x    时间: 2011-12-20 16:30
标题: 新手,这是自己设计出的一个简单计算器代码,觉得有很多不足,请大家看看里面的代码有哪些能够改进的地方,感激不尽!

[attach]1838[/attach]
空间 tc模拟计算器
//定义默认空间
浮点型 数值1,数值2,数值3
字符型 编辑框0,编辑框1,值
功能 逻辑型 开始_点击()
//这里添加你要执行的代码
编辑框0=编辑框.获得文本("编辑框0")
编辑框1=编辑框.获得文本("编辑框1")
如果 (字符串.长度(编辑框0)==0||字符串.长度(编辑框1)==0)
    辅助.消息框("请输入要计算的数值")
否则
    辅助.消息框("好了,现在请点击运算符进行计算。")
如果结束
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
辅助.退出()
返回 真
//函数返回语句
功能结束
功能 逻辑型 按钮0_点击()
//这里添加你要执行的代码
数值1=转换.字符型转浮点型(编辑框0)
数值2=转换.字符型转浮点型(编辑框1)
数值3=数值1+数值2
值=转换.浮点型转字符型(数值3)
标签.设置文本("标签1",值)
返回 真
功能结束
功能 逻辑型 按钮1_点击()
//这里添加你要执行的代码
数值1=转换.字符型转浮点型(编辑框0)
数值2=转换.字符型转浮点型(编辑框1)
数值3=数值1-数值2
值=转换.浮点型转字符型(数值3)
标签.设置文本("标签1",值)
返回 真
功能结束
功能 逻辑型 按钮2_点击()
//这里添加你要执行的代码
数值1=转换.字符型转浮点型(编辑框0)
数值2=转换.字符型转浮点型(编辑框1)
数值3=数值1*数值2
值=转换.浮点型转字符型(数值3)
标签.设置文本("标签1",值)
返回 真
功能结束
功能 逻辑型 按钮3_点击()
//这里添加你要执行的代码
数值1=转换.字符型转浮点型(编辑框0)
数值2=转换.字符型转浮点型(编辑框1)
数值3=数值1/数值2
值=转换.浮点型转字符型(数值3)
标签.设置文本("标签1",值)
返回 真
功能结束
空间结束
//空间结束语句

作者: tiexuegongch    时间: 2011-12-20 18:19
学有所成啊!不错!
作者: 我就喜欢呵呵呵    时间: 2011-12-20 20:43
:strong:
作者: 三猫大叔    时间: 2011-12-21 10:21
不错的,顶个。
作者: qwe527x    时间: 2011-12-21 15:47
哇,三猫大叔亲自来顶我了,感觉很荣幸啊~~~




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1