TC官方合作论坛

标题: 【有源码】我的计算器终于可以交作业了 [打印本页]
作者: ma3yu    时间: 2013-1-27 12:33
标题: 【有源码】我的计算器终于可以交作业了
[attach]7529[/attach][attach]7529[/attach]   学习这个计算器 可谓是死了我N+N的脑细胞,问了无数的朋友和导师 还有我老师冷月,他们不是给我个数组 就是给我个思路,要吗给我推荐论坛别人写的计算器代码,最终我用最简单也最基础的语句写完这个计算器.在这里小小骄傲一下.   朋友们给我的回答  索然没有全部用在这个里面不过我学习的知识,却是无法忘怀的.在这里特别感谢几个不厌其烦知道我的朋友"""""""""""""""""TC糖果,学员-那个傻逼,冷月,TC-am,还有几个朋友的QQ名忘记了.................感谢你们........祝福你们新春快乐,合家团圆,事业更上一层楼.
下面就是源代码:

  2. 空间 分割
  3. 返回值
  4. 功能 运算()
  5.     内容=编辑框.获得文本("编辑框0")
  6.     如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
  7.         //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
  8.         计算=返回值[0]+返回值[1]//计算分割后的数值
  9.         结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
  10.     如果结束
  11.     如果(字符串.分割(内容,"-",返回值) )
  12.         计算=返回值[0]-返回值[1]
  13.         编辑框.设置文本("编辑框0",计算)
  14.     如果结束
  15.     如果(字符串.分割(内容,"*",返回值) )
  16.         计算=返回值[0]*返回值[1]
  17.         编辑框.设置文本("编辑框0",计算)
  18.     如果结束
  19.     如果(字符串.分割(内容,"/",返回值) )
  20.         计算=返回值[0]/返回值[1]
  21.         编辑框.设置文本("编辑框0",计算)
  22.     如果结束
  23. 功能结束
  24. 功能 开始_点击()
  25.     线程.开启("分割.运算","")
  26. 功能结束
  27. 功能 退出_点击()
  28.     编辑框.设置文本("编辑框0","0")
  29. 功能结束
  30. 功能 按钮15_点击()
  31.     内容=编辑框.获得文本("编辑框0")
  32.     编辑框.设置文本("编辑框0",字符串.移除(内容,1,假))
  33. 功能结束
  34. 功能 按钮14_点击()
  35.     内容=编辑框.获得文本("编辑框0")
  36.     编辑框.设置文本("编辑框0",内容&".")
  37. 功能结束
  38. 功能 按钮13_点击()
  39.     内容=编辑框.获得文本("编辑框0")
  40.     如果(字符串.查找字符串(内容,"+")==(字符串.长度(内容)-1))||字符串.查找字符串(内容,"-")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"*")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"/")==(字符串.长度(内容)-1)
  41.         返回 0
  42.     如果结束
  43.     编辑框.设置文本("编辑框0",内容&"/")
  44.     如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
  45.         //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
  46.         计算=返回值[0]+返回值[1]//计算分割后的数值
  47.         结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
  48.     如果结束
  49.     如果(字符串.分割(内容,"-",返回值) )
  50.         计算=返回值[0]-返回值[1]
  51.         编辑框.设置文本("编辑框0",计算)
  52.     如果结束
  53.     如果(字符串.分割(内容,"*",返回值) )
  54.         计算=返回值[0]*返回值[1]
  55.         编辑框.设置文本("编辑框0",计算)
  56.     如果结束
  57.     如果(字符串.分割(内容,"/",返回值) )
  58.         计算=返回值[0]/返回值[1]
  59.         编辑框.设置文本("编辑框0",计算)
  60.     如果结束
  61. 功能结束
  62. 功能 按钮12_点击()
  63.     内容=编辑框.获得文本("编辑框0")
  64.     如果(字符串.查找字符串(内容,"+")==(字符串.长度(内容)-1))||字符串.查找字符串(内容,"-")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"*")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"/")==(字符串.长度(内容)-1)
  65.         返回 0
  66.     如果结束
  67.     编辑框.设置文本("编辑框0",内容&"*")
  68.     如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
  69.         //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
  70.         计算=返回值[0]+返回值[1]//计算分割后的数值
  71.         结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
  72.     如果结束
  73.     如果(字符串.分割(内容,"-",返回值) )
  74.         计算=返回值[0]-返回值[1]
  75.         编辑框.设置文本("编辑框0",计算)
  76.     如果结束
  77.     如果(字符串.分割(内容,"*",返回值) )
  78.         计算=返回值[0]*返回值[1]
  79.         编辑框.设置文本("编辑框0",计算)
  80.     如果结束
  81.     如果(字符串.分割(内容,"/",返回值) )
  82.         计算=返回值[0]/返回值[1]
  83.         编辑框.设置文本("编辑框0",计算)
  84.     如果结束
  85. 功能结束
  86. 功能 按钮11_点击()
  87.     内容=编辑框.获得文本("编辑框0")
  88.     如果(字符串.查找字符串(内容,"+")==(字符串.长度(内容)-1))||字符串.查找字符串(内容,"-")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"*")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"/")==(字符串.长度(内容)-1)
  89.         返回 0
  90.     如果结束
  91.     编辑框.设置文本("编辑框0",内容&"-")
  92.     如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
  93.         //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
  94.         计算=返回值[0]+返回值[1]//计算分割后的数值
  95.         结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
  96.     如果结束
  97.     如果(字符串.分割(内容,"-",返回值) )
  98.         计算=返回值[0]-返回值[1]
  99.         编辑框.设置文本("编辑框0",计算)
  100.     如果结束
  101.     如果(字符串.分割(内容,"*",返回值) )
  102.         计算=返回值[0]*返回值[1]
  103.         编辑框.设置文本("编辑框0",计算)
  104.     如果结束
  105.     如果(字符串.分割(内容,"/",返回值) )
  106.         计算=返回值[0]/返回值[1]
  107.         编辑框.设置文本("编辑框0",计算)
  108.     如果结束
  109. 功能结束
  110. 功能 按钮10_点击()
  111.     内容=编辑框.获得文本("编辑框0")//读取编辑框的内容
  112.     如果(字符串.查找字符串(内容,"+")==(字符串.长度(内容)-1))||字符串.查找字符串(内容,"-")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"*")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"/")==(字符串.长度(内容)-1)
  113.         返回 0 //查找是不是有多个运算符
  114.     如果结束
  115.     编辑框.设置文本("编辑框0",内容&"+")//在编辑框内容后面写上运算符"+"
  116.     如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
  117.         //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
  118.         计算=返回值[0]+返回值[1]//计算分割后的数值
  119.         结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
  120.     如果结束
  121.     如果(字符串.分割(内容,"-",返回值) )
  122.         计算=返回值[0]-返回值[1]
  123.         编辑框.设置文本("编辑框0",计算)
  124.     如果结束
  125.     如果(字符串.分割(内容,"*",返回值) )
  126.         计算=返回值[0]*返回值[1]
  127.         编辑框.设置文本("编辑框0",计算)
  128.     如果结束
  129.     如果(字符串.分割(内容,"/",返回值) )
  130.         计算=返回值[0]/返回值[1]
  131.         编辑框.设置文本("编辑框0",计算)
  132.     如果结束
  133. 功能结束
  134. 功能 按钮0_点击()
  135.     内容=编辑框.获得文本("编辑框0")
  136.     编辑框.设置文本("编辑框0",内容&"0")
  137. 功能结束
  138. 功能 按钮9_点击()
  139.     内容=编辑框.获得文本("编辑框0")
  140.     编辑框.设置文本("编辑框0",内容&"9")
  141. 功能结束
  142. 功能 按钮8_点击()
  143.     内容=编辑框.获得文本("编辑框0")
  144.     编辑框.设置文本("编辑框0",内容&"8")
  145. 功能结束
  146. 功能 按钮7_点击()
  147.     内容=编辑框.获得文本("编辑框0")
  148.     编辑框.设置文本("编辑框0",内容&"7")
  149. 功能结束
  150. 功能 按钮6_点击()
  151.     内容=编辑框.获得文本("编辑框0")
  152.     编辑框.设置文本("编辑框0",内容&"6")
  153. 功能结束
  154. 功能 按钮5_点击()
  155.     内容=编辑框.获得文本("编辑框0")
  156.     编辑框.设置文本("编辑框0",内容&"5")
  157. 功能结束
  158. 功能 按钮4_点击()
  159.     内容=编辑框.获得文本("编辑框0")
  160.     编辑框.设置文本("编辑框0",内容&"4")
  161. 功能结束
  162. 功能 按钮3_点击()
  163.     内容=编辑框.获得文本("编辑框0")
  164.     编辑框.设置文本("编辑框0",内容&"3")
  165. 功能结束
  166. 功能 按钮2_点击()
  167.     内容=编辑框.获得文本("编辑框0")
  168.     编辑框.设置文本("编辑框0",内容&"2")
  169. 功能结束
  170. 功能 按钮1_点击()
  171.     内容=编辑框.获得文本("编辑框0")
  172.     编辑框.设置文本("编辑框0",内容&"1")
  173. 功能结束
  174. 空间结束
复制代码
空间 分割
返回值
功能 运算()
    内容=编辑框.获得文本("编辑框0")
    如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
        //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
        计算=返回值[0]+返回值[1]//计算分割后的数值
        结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
    如果结束
    如果(字符串.分割(内容,"-",返回值) )
        计算=返回值[0]-返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"*",返回值) )
        计算=返回值[0]*返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"/",返回值) )
        计算=返回值[0]/返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
功能结束
功能 开始_点击()
    线程.开启("分割.运算","")
功能结束
功能 退出_点击()
    编辑框.设置文本("编辑框0","0")
功能结束
功能 按钮15_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",字符串.移除(内容,1,假))
功能结束
功能 按钮14_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&".")
功能结束
功能 按钮13_点击()
    内容=编辑框.获得文本("编辑框0")
    如果(字符串.查找字符串(内容,"+")==(字符串.长度(内容)-1))||字符串.查找字符串(内容,"-")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"*")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"/")==(字符串.长度(内容)-1)
        返回 0
    如果结束
    编辑框.设置文本("编辑框0",内容&"/")
    如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
        //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
        计算=返回值[0]+返回值[1]//计算分割后的数值
        结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
    如果结束
    如果(字符串.分割(内容,"-",返回值) )
        计算=返回值[0]-返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"*",返回值) )
        计算=返回值[0]*返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"/",返回值) )
        计算=返回值[0]/返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
功能结束
功能 按钮12_点击()
    内容=编辑框.获得文本("编辑框0")
    如果(字符串.查找字符串(内容,"+")==(字符串.长度(内容)-1))||字符串.查找字符串(内容,"-")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"*")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"/")==(字符串.长度(内容)-1)
        返回 0
    如果结束
    编辑框.设置文本("编辑框0",内容&"*")
    如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
        //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
        计算=返回值[0]+返回值[1]//计算分割后的数值
        结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
    如果结束
    如果(字符串.分割(内容,"-",返回值) )
        计算=返回值[0]-返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"*",返回值) )
        计算=返回值[0]*返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"/",返回值) )
        计算=返回值[0]/返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
功能结束
功能 按钮11_点击()
    内容=编辑框.获得文本("编辑框0")
    如果(字符串.查找字符串(内容,"+")==(字符串.长度(内容)-1))||字符串.查找字符串(内容,"-")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"*")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"/")==(字符串.长度(内容)-1)
        返回 0
    如果结束
    编辑框.设置文本("编辑框0",内容&"-")
    如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
        //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
        计算=返回值[0]+返回值[1]//计算分割后的数值
        结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
    如果结束
    如果(字符串.分割(内容,"-",返回值) )
        计算=返回值[0]-返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"*",返回值) )
        计算=返回值[0]*返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"/",返回值) )
        计算=返回值[0]/返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
功能结束
功能 按钮10_点击()
    内容=编辑框.获得文本("编辑框0")//读取编辑框的内容
    如果(字符串.查找字符串(内容,"+")==(字符串.长度(内容)-1))||字符串.查找字符串(内容,"-")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"*")==(字符串.长度(内容)-1)||字符串.查找字符串(内容,"/")==(字符串.长度(内容)-1)
        返回 0 //查找是不是有多个运算符
    如果结束
    编辑框.设置文本("编辑框0",内容&"+")//在编辑框内容后面写上运算符"+"
    如果(字符串.分割(内容,"+",返回值) )//判断编辑框内容里有没有分隔符,
        //如果有就用分隔符分割得到分割后的返回值  数值1和数值2
        计算=返回值[0]+返回值[1]//计算分割后的数值
        结果= 编辑框.设置文本("编辑框0",计算)//在编辑框里显示计算结果
    如果结束
    如果(字符串.分割(内容,"-",返回值) )
        计算=返回值[0]-返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"*",返回值) )
        计算=返回值[0]*返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
    如果(字符串.分割(内容,"/",返回值) )
        计算=返回值[0]/返回值[1]
        编辑框.设置文本("编辑框0",计算)
    如果结束
功能结束
功能 按钮0_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"0")
功能结束
功能 按钮9_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"9")
功能结束
功能 按钮8_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"8")
功能结束
功能 按钮7_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"7")
功能结束
功能 按钮6_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"6")
功能结束
功能 按钮5_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"5")
功能结束
功能 按钮4_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"4")
功能结束
功能 按钮3_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"3")
功能结束
功能 按钮2_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"2")
功能结束
功能 按钮1_点击()
    内容=编辑框.获得文本("编辑框0")
    编辑框.设置文本("编辑框0",内容&"1")
功能结束
空间结束

[attach]7528[/attach]
[attach]7529[/attach]
作者: 幼园留级老油条    时间: 2013-1-27 12:35
厉害啊
作者: Sky_Pro    时间: 2013-1-27 12:55
恭喜你啦！！！
作者: milai5201    时间: 2013-1-27 12:56
哥就喜欢这种刚发的帖子，
如果火了就是个前排，还可以混
个脸熟;2.万一那个白富美看中咱，
说不定就把咱包养了。就算没人
包养咱，咱也得经验了，稳赚不
赔；3.就算这帖子没人回复了，沉
贴了。也感觉是我弄沉的，特有
成就感
作者: 如此美丽。    时间: 2013-1-27 16:18
我顿时出名了  - =   就算我名字好  你也别直接打出来     学员- 那个傻逼 ...    我不是很傻好不好
作者: tired    时间: 2013-1-27 17:01
好厉害~~我完全看不懂......
作者: 今非    时间: 2013-1-27 18:00
值得鼓励
作者: ma3yu    时间: 2013-1-28 00:00
不是吧 这样的代码 还看不明白?
作者: zhmap    时间: 2013-3-13 21:55
太牛了,顶一个
作者: 694840212    时间: 2013-4-18 11:15
学习
作者: 2938724136    时间: 2013-7-3 19:35
太牛X,了,我学了三天,有点看不懂
作者: 1230123    时间: 2013-7-8 10:47
厉害啊 顶



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