|
空间 计算机
变量 a
变量 b
变量 c
变量 d
变量 e
a="0"
字符型 c=""
d=""
功能 按钮_7_点击()
如果(a=="0")
a=字符串.连接("","7")
编辑框.设置文本("编辑框0",a)
否则
//如果()
//如果结束
a=字符串.连接(a,"7")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_0_点击()
如果(a>0)
a=字符串.连接(a,"0")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_1_点击()
如果(a=="0")
a=字符串.连接("","1")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"1")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_2_点击()
如果(a=="0")
a=字符串.连接("","2")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"2")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_3_点击()
如果(a=="0")
a=字符串.连接("","3")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"3")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_5_点击()
如果(a=="0")
a=字符串.连接("","5")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"5")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_4_点击()
如果(a=="0")
a=字符串.连接("","4")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"4")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_6_点击()
如果(a=="0")
a=字符串.连接("","6")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"6")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_等_点击()
//辅助.消息框(b)
//条件(a>0)
选择(c)
条件 "+":
d=e+a
如果(d<1)
d=字符串.连接("0",d)
编辑框.设置文本("编辑框0",d)
否则
d=字符串.连接(d,"")
编辑框.设置文本("编辑框0",d)
如果结束
条件 "-":
d=b-a
如果(d<1)
d=字符串.连接("0",d)
编辑框.设置文本("编辑框0",d)
否则
d=字符串.连接(d,"")
编辑框.设置文本("编辑框0",d)
如果结束
条件 "*":
d=b*a
如果(d<1)
d=字符串.连接("0",d)
编辑框.设置文本("编辑框0",d)
否则
d=字符串.连接(d,"")
编辑框.设置文本("编辑框0",d)
如果结束
条件 "/":
d=b/a
如果(d<1)
d=字符串.连接("0",d)
编辑框.设置文本("编辑框0",d)
否则
d=字符串.连接(d,"")
编辑框.设置文本("编辑框0",d)
如果结束
选择结束 //执行完一条匹配的条件即跳到选择结束
功能结束
功能 按钮_8_点击()
如果(a=="0")
a=字符串.连接("","8")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"8")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_9_点击()
如果(a=="0")
a=字符串.连接("","9")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"9")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_加_点击()
c=""
e=e+a
b=a
a=""
c="+"
编辑框.设置文本("编辑框0","")
功能结束
功能 按钮_减_点击()
c=""
b=a
a=""
c="-"
编辑框.设置文本("编辑框0","")
功能结束
功能 按钮_乘_点击()
c=""
b=a
a=""
c="*"
功能结束
功能 按钮_除_点击()
c=""
b=a
a=""
c="/"
编辑框.设置文本("编辑框0","")
功能结束
功能 按钮0_点击()
功能结束
功能 按钮_点_点击()
//返回位置=字符串.查找字符串(编辑框.获得文本("编辑框0"),0.)
//辅助.消息框(返回位置)
如果(字符串.查找字符串(编辑框.获得文本("编辑框0"),".")==真)
a=字符串.连接(a,".")
编辑框.设置文本("编辑框0",a)
否则
a=字符串.连接(a,"")
编辑框.设置文本("编辑框0",a)
如果结束
功能结束
功能 按钮_清除_点击()
编辑框.设置文本("编辑框0","")
a=""
b=""
c=""
d=""
e=""
功能结束
空间结束
现在刚改的关于加法的 为什么我点清除了 以后再运行加法就出现错误 |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
|