|
|
马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
空间 专属计算器
变量 中间值,加数,运算符,临时变量=false
功能 数字2_点击()
//这里添加你要执行的代码
中间值 = 中间值&"2"
编辑框.设置文本("编辑框0",中间值)
临时变量=false
功能结束
功能 数字1_点击()
//这里添加你要执行的代码
中间值 = 中间值&"1"
编辑框.设置文本("编辑框0",中间值)
临时变量=false
功能结束
功能 数字3_点击()
//这里添加你要执行的代码
中间值 = 中间值&"3"
编辑框.设置文本("编辑框0",中间值)
临时变量=false
功能结束
功能 数字4_点击()
//这里添加你要执行的代码
中间值 = 中间值&"4"
编辑框.设置文本("编辑框0",中间值)
临时变量=false
功能结束
功能 数字5_点击()
//这里添加你要执行的代码
中间值 = 中间值&"5"
编辑框.设置文本("编辑框0",中间值)
临时变量=false
功能结束
功能 数字6_点击()
//这里添加你要执行的代码
中间值 = 中间值&"6"
编辑框.设置文本("编辑框0",中间值)
临时变量=false
功能结束
功能 数字7_点击()
//这里添加你要执行的代码
中间值 = 中间值&"7"
编辑框.设置文本("编辑框0",中间值)
临时变量=false
功能结束
功能 数字8_点击()
//这里添加你要执行的代码
中间值 = 中间值&"8"
编辑框.设置文本("编辑框0",中间值)
临时变量=false
功能结束
功能 数字9_点击()
中间值 = 中间值&"9"
编辑框.设置文本("编辑框0",中间值)
临时变量=false
功能结束
功能 数字0_点击()
结果=编辑框.获得文本("编辑框0")
如果(临时变量==true)
中间值=中间值&"0."
编辑框.设置文本("编辑框0",中间值)
否则
如果(字符串.长度(结果)==0)&&(结果=="")
中间值=中间值&"0."
编辑框.设置文本("编辑框0",中间值)
否则
中间值=中间值&"0"
编辑框.设置文本("编辑框0",中间值)
如果结束
如果结束
临时变量=false
功能结束
功能 加号_点击()
临时变量=true
运算符 = "+"
加数 = 编辑框.获得文本("编辑框0")
中间值 = ""
功能结束
功能 减号_点击()
临时变量=true
运算符 = "-"
加数 = 编辑框.获得文本("编辑框0")
中间值 = ""
功能结束
功能 乘号_点击()
临时变量=true
运算符 = "*"
加数 = 编辑框.获得文本("编辑框0")
中间值 = ""
功能结束
功能 除号_点击()
临时变量=true
运算符 = "/"
加数 = 编辑框.获得文本("编辑框0")
中间值 = ""
功能结束
功能 清除_点击()
临时变量=true
中间值 = ""
运算符 = ""
加数 = ""
编辑框.设置文本("编辑框0",中间值)
功能结束
功能 小数点_点击()
内容 = 编辑框.获得文本("编辑框0")
if(临时变量==true)
内容=""
endif
如果(字符串.查找字符串(内容,".")== -1) && (字符串.长度(内容)==0)
中间值=中间值&"0."
编辑框.设置文本("编辑框0",中间值)
否则
如果(字符串.查找字符串(内容,".")== -1)
中间值=中间值&"."
编辑框.设置文本("编辑框0",中间值)
否则
中间值=中间值&""
如果结束
如果结束
临时变量=false
功能结束
功能 等于_点击()
变量 结果
选择(运算符)
条件 "+":
结果 = 类型.转浮点型(加数) + 类型.转浮点型(中间值)
编辑框.设置文本("编辑框0",结果)
条件 "-":
结果 = 类型.转浮点型(加数) - 类型.转浮点型(中间值)
编辑框.设置文本("编辑框0",结果)
条件 "*":
结果 = 类型.转浮点型(加数) * 类型.转浮点型(中间值)
编辑框.设置文本("编辑框0",结果)
条件 "/":
如果(中间值 ==0)
辅助.消息框("除数不能为0","警告")
返回 0
如果结束
结果 = 类型.转浮点型(加数) / 类型.转浮点型(中间值)
编辑框.设置文本("编辑框0",结果)
选择结束
中间值 = ""
临时变量=true
功能结束
功能 删除前一个字符_点击()
结果=编辑框.获得文本("编辑框0")
内容=字符串.移除(结果,1,假)
编辑框.设置文本("编辑框0",内容)
中间值=""&内容
功能结束
空间结束
|
|
/2 
发表于 2013-6-5 13:24:48
楼主