TC官方合作论坛

 找回密码
 立即注册
查看: 4150|回复: 11

[入门] 【有源码】我的计算器终于可以交作业了

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

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



本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
回复

使用道具 举报

发表于 2013-1-27 12:35:06 | 显示全部楼层
厉害啊
回复 支持 反对

使用道具 举报

发表于 2013-1-27 12:55:39 | 显示全部楼层
恭喜你啦!!!
回复 支持 反对

使用道具 举报

发表于 2013-1-27 12:56:50 | 显示全部楼层
哥就喜欢这种刚发的帖子,
如果火了就是个前排,还可以混
个脸熟;2.万一那个白富美看中咱,
说不定就把咱包养了。就算没人
包养咱,咱也得经验了,稳赚不
赔;3.就算这帖子没人回复了,沉
贴了。也感觉是我弄沉的,特有
成就感
回复 支持 反对

使用道具 举报

发表于 2013-1-27 16:18:50 | 显示全部楼层
我顿时出名了  - =   就算我名字好  你也别直接打出来     学员- 那个傻逼 ...    我不是很傻好不好
回复 支持 反对

使用道具 举报

发表于 2013-1-27 17:01:46 | 显示全部楼层
好厉害~~我完全看不懂......
回复 支持 反对

使用道具 举报

发表于 2013-1-27 18:00:25 | 显示全部楼层
值得鼓励
回复 支持 反对

使用道具 举报

 楼主| 发表于 2013-1-28 00:00:53 | 显示全部楼层
不是吧 这样的代码 还看不明白?
回复 支持 反对

使用道具 举报

发表于 2013-3-13 21:55:56 | 显示全部楼层
太牛了,顶一个
回复 支持 反对

使用道具 举报

发表于 2013-4-18 11:15:16 | 显示全部楼层
学习
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-5-3 21:31 , Processed in 0.045113 second(s), 25 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表