易语言计算源码
1. 在易语言中用一个编辑框一个按钮如何做个加减乘除都有的计算器。就源码
复制代码即可 下面附图片
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 i, 整数型
.局部变量 n, 文本型, , "0"
.如果真 (寻找文本 (编辑框1.内容, “+”, , 假) > 0)
n = 分割文本 (编辑框1.内容, “+”, )
编辑框1.内容 = 编辑框1.内容 + “=” + 到文本 (到数值 (n [1]) + 到数值 (n [2]))
.如果真结束
.如果真 (寻找文本 (编辑框1.内容, “-”, , 假) > 0)
n = 分割文本 (编辑框1.内容, “-”, )
编辑框1.内容 = 编辑框1.内容 + “=” + 到文本 (到数值 (n [1]) - 到数值 (n [2]))
.如果真结束
.如果真 (寻找文本 (编辑框1.内容, “*”, , 假) > 0)
n = 分割文本 (编辑框1.内容, “*”, )
编辑框1.内容 = 编辑框1.内容 + “=” + 到文本 (到数值 (n [1]) × 到数值 (n [2]))
.如果真结束
.如果真 (寻找文本 (编辑框1.内容, “×”, , 假) > 0)
n = 分割文本 (编辑框1.内容, “×”, )
编辑框1.内容 = 编辑框1.内容 + “=” + 到文本 (到数值 (n [1]) × 到数值 (n [2]))
.如果真结束
.如果真 (寻找文本 (编辑框1.内容, “/”, , 假) > 0)
n = 分割文本 (编辑框1.内容, “/”, )
编辑框1.内容 = 编辑框1.内容 + “=” + 到文本 (到数值 (n [1]) ÷ 到数值 (n [2]))
.如果真结束
.如果真 (寻找文本 (编辑框1.内容, “÷”, , 假) > 0)
n = 分割文本 (编辑框1.内容, “÷”, )
编辑框1.内容 = 编辑框1.内容 + “=” + 到文本 (到数值 (n [1]) ÷ 到数值 (n [2]))
.如果真结束
目前代码只支持两个数字之间的加减乘除运算,如果需要多个数字的计算,自己按套路改良一下吧
2. 在易语言中计算公式
计算式很简单,你想让人帮你全部写,啥分都没有,懒得写。
保留小数点后两位就用
四舍五入 (, ) 这个命令就好了
其他的 计算都很简单,自己写吧
3. 易语言怎么做源码
首先你要去下一个 易语言
http://www.dywt.com.cn/pdown.htm 这是 易语言官方地址
用它你就可以编写自己想要的程序了 也就是所谓的 源码 了
把程序 编译 就是 所谓的 软件了
(表达的比较白话了 见笑了)
4. 易语言源码大全
下载地弯橘址埋知团在 图片猛世里
5. 易语言源码是什么
就是 文件名.e的文件 用这个文件 可以修改程序的功能 界面等 把它改写成你自己的程序 如果你想学习易语言推荐去赤血学院 学习一下 哪里成套的视频教程 可以让你快速入门。
6. 求易语言计算器的源代码
http://www.5a5x.com/06/201210/10277346.html
7. 用易语言做一个简单的计算器,如下图,求源码
.版本2
.程序集窗口程序集_启动窗口
.程序集变量局部_待加减乘除,整数型
.程序集变量局部_点加减乘除,文本型
.程序集变量局部_到小数,双精度小数型
.子程序_按钮1_被单击
.如果(编辑框1.内容≠“0”)
编辑框1.加入文本(“1”)
.否则
编辑框1.内容=“”
编辑框1.加入文本(“1”)
.如果结束
.子程序_按钮2_被单击
.如果(编辑框1.内容≠“0”)
编辑框1.加入文本(“2”)
.否则
编辑框1.内容=“”
编辑框1.加入文本(“2”)
.如果结束
.子程序_按钮3_被单击
.如果(编辑框1.内容≠“0”)
编辑框1.加入文本(“3”)
.否则
编辑框1.内容=“”
编辑框1.加入文本(“3”)
.如果结束
.子程序_按钮4_被单击
.如果(编辑框1.内容≠“0”)
编辑框1.加入文本(“4”)
.否则
编辑框1.内容=“”
编辑框1.加入文本(“4”)
.如果结束
.子程序_按钮5_被单击
.如果(编辑框1.内容≠“0”)
编辑框1.加入文本(“5”)
.否则
编辑框1.内容=“”
编辑框1.加入文本(“5”)
.如果结束
.子程序_按钮6_被单击
.如果(编辑框1.内容≠“0”)
编辑框1.加入文本(“6”)
.否则
编辑框1.内容=“”
编辑框1.加入文本(“6”)
.如果结束
.子程序_按钮7_被单击
.如果(编辑框1.内容≠“0”)
编辑框1.加入文本(“7”)
.否则
编辑框1.内容=“”
编辑框1.加入文本(“7”)
.如果结束
.子程序_按钮8_被单击
.如果(编辑框1.内容≠“0”)
编辑框1.加入文本(“8”)
.否则
编辑框1.内容=“”
编辑框1.加入文本(“8”)
.如果结束
.子程序_按钮9_被单击
.如果(编辑框1.内容≠“0”)
编辑框1.加入文本(“9”)
.否则
编辑框1.内容=“”
编辑框1.加入文本(“9”)
.如果结束
.子程序_按钮0_被单击
.判断开始(编辑框1.内容=“0”)
返回()
.默认
编辑框1.加入文本(“0”)
.判断结束
.子程序_按钮C_被单击
编辑框1.内容=“”
.子程序_按钮加_被单击
.判断开始(局部_点加减乘除=“.”)
编辑框2.内容=“”
编辑框2.内容=“+”
局部_到小数=到数值(编辑框1.内容)
编辑框1.内容=“”
.默认
编辑框2.内容=“”
编辑框2.内容=“+”
局部_待加减乘除=到数值(编辑框1.内容)
编辑框1.内容=“”
.判断结束.子程序_按钮减_被单击
.判断开始(局部_点加减乘除=“.”)
编辑框2.内容=“”
编辑框2.内容=“-”
局部_到小数=到数值(编辑框1.内容)
编辑框1.内容=“”
.默认
编辑框2.内容=“”
编辑框2.内容=“-”
局部_待加减乘除=到数值(编辑框1.内容)
编辑框1.内容=“”
.判断结束
.子程序_按钮乘_被单击
.判断开始(局部_点加减乘除=“.”)
编辑框2.内容=“”
编辑框2.内容=“*”
局部_到小数=到数值(编辑框1.内容)
编辑框1.内容=“”
.默认
编辑框2.内容=“”
编辑框2.内容=“*”
局部_待加减乘除=到数值(编辑框1.内容)
编辑框1.内容=“”
.判断结束
.子程序_按钮除_被单击
.判断开始(局部_点加减乘除=“.”)
编辑框2.内容=“”
编辑框2.内容=“/”
局部_到小数=到数值(编辑框1.内容)
编辑框1.内容=“”
.默认
编辑框2.内容=“”
编辑框2.内容=“/”
局部_待加减乘除=到数值(编辑框1.内容)
编辑框1.内容=“”
.判断结束
.子程序_按钮等于_被单击
.判断开始(局部_点加减乘除=“.”)
.判断开始(编辑框2.内容=“+”)
编辑框1.内容=到文本(局部_到小数+到数值(编辑框1.内容))
'局部_点加减乘除=“”
.判断(编辑框2.内容=“-”)
编辑框1.内容=到文本(局部_到小数-到数值(编辑框1.内容))
'局部_点加减乘除=“”
.判断(编辑框2.内容=“*”)
编辑框1.内容=到文本(局部_到小数×到数值(编辑框1.内容))
'局部_点加减乘除=“”
.判断(编辑框2.内容=“/”)
编辑框1.内容=到文本(局部_到小数÷到数值(编辑框1.内容))
'局部_点加减乘除=“”
.默认
.判断结束
.判断(编辑框2.内容=“+”)
编辑框1.内容=到文本(局部_待加减乘除+到数值(编辑框1.内容))
.判断(编辑框2.内容=“-”)
编辑框1.内容=到文本(局部_待加减乘除-到数值(编辑框1.内容))
.判断(编辑框2.内容=“*”)
编辑框1.内容=到文本(局部_待加减乘除×到数值(编辑框1.内容))
.判断(编辑框2.内容=“/”)
编辑框1.内容=到文本(局部_待加减乘除÷到数值(编辑框1.内容))
.默认
.判断结束.子程序_按钮点_被单击
编辑框1.加入文本(“.”)
局部_点加减乘除=“.”
源代码
提取码:wrmg