易语言计算器源码下载_易语言实现计算器

hacker|
157

文章目录:

用易语言做一个简单的计算器,如下图,求源码

.版本 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

易语言制做计算器

呵呵,这个其实没这么麻烦,

易语言

里面就有这样的组件可以利用:1.先在扩展组件里面找到脚本组件并添加2.添加两个编辑框(必须的)3.添加一个按钮(没按钮怎么行?)4.些入代码,代码如下:

.

子程序

_按钮1_被单击

编辑框2.内容

脚本组件1.计算表达式

(编辑框1.内容)

如果可以使用,请采纳,谢谢。

谁给我做个易语言计算器源码,具体如下

可以自定义算式的,关于组件的名称截图里都标了的。

如果LZ要源码就留下邮箱吧

.版本 2

.子程序 _按钮1_被单击

.局部变量 输入, 整数型, , "6"

.局部变量 算式, 文本型

.局部变量 Suan, 文本型, , "0"

.局部变量 S, 文本型

.局部变量 i, 整数型

.局部变量 ii, 整数型

.局部变量 结果, 整数型

输入 [1] = 到整数 (编辑框A.内容)

输入 [2] = 到整数 (编辑框B.内容)

输入 [3] = 到整数 (编辑框C.内容)

输入 [4] = 到整数 (编辑框D.内容)

输入 [5] = 到整数 (编辑框E.内容)

输入 [6] = 到整数 (编辑框F.内容)

编辑框_算式.内容 = 删全部空 (编辑框_算式.内容)

算式 = 编辑框_算式.内容

算式 = 子文本替换 (算式, “A”, “1”, , , 假)

算式 = 子文本替换 (算式, “B”, “2”, , , 假)

算式 = 子文本替换 (算式, “C”, “3”, , , 假)

算式 = 子文本替换 (算式, “D”, “4”, , , 假)

算式 = 子文本替换 (算式, “E”, “5”, , , 假)

算式 = 子文本替换 (算式, “F”, “6”, , , 假)

Suan = 分割文本 (算式, #换行符, )

.计次循环首 (取数组成员数 (Suan), i)

.如果真 (Suan [i] ≠ “”)

结果 = 0

.计次循环首 (取文本长度 (Suan [i]), ii)

S = 取文本中间 (Suan [i], ii, 1)

结果 = 结果 + 输入 [到整数 (S)]

.计次循环尾 ()

编辑框_结果.加入文本 (到文本 (结果) + “ ”)

.如果真结束

.计次循环尾 ()

求易语言最简单的计算器源码高手进

整个代码发到你邮箱了。1小数点按钮的代码修改.子程序

_按钮点_被单击'

如果

(编辑框4.内容

“”)'

编辑框4.内容

“.”编辑框1.内容

编辑框1.内容

“.”2、数字键被按下代码修改.版本

2.子程序

数字键被按下后.如果

(over

真)

编辑框1.内容

“”

over

假.否则.如果结束3、运算符被按下后

代码里加入编辑框1.内容

“”

如果帮助到您,请记得采纳为满意答案哈,谢谢!祝您生活愉快!

参考资料:

易语言计算器源码

做好了 拿去吧。输入进价默认安装50%计算出建议售价。可以自己输入 输入之后建议零售价都是自动跟着进价以及自定义毛利计算的。

求用易语言编写个计算器,要源码。

.版本2 .程序集窗口程序集1 .子程序_按钮1_被单击 .如果真(单选框1.选中=真) 编辑框3.内容=到文本(到数值(编辑框1.内容)+到数值(编辑框2.内容)).如果真结束.如果真(单选框2.选中=真) 编辑框3.内容=到文本(到数值(编辑框1.内容)-到数值(编辑框2.内容)).如果真结束.如果真(单选框3.选中=真) 编辑框3.内容=到文本(到数值(编辑框1.内容)×到数值(编辑框2.内容)).如果真结束.如果真(单选框4.选中=真) 编辑框3.内容=到文本(到数值(编辑框1.内容)÷到数值(编辑框2.内容)).如果真结束 .子程序_按钮2_被单击 编辑框1.内容=“”编辑框2.内容=“”编辑框3.内容=“”

3条大神的评论

  • avatar
    访客 2022-07-01 下午 04:53:20

     (局部_待加减乘除 ÷ 到数值 (编辑框1.内容)).默认.判断结束.子程序 _按钮点_被单击编辑框1.加入文本 (“.”)局部_点加减乘除 = “.”源代码提取码:wrmg易语言制做计算器呵呵,这个其实没这么麻烦,易语言里面就有这

  • avatar
    访客 2022-07-01 下午 05:11:26

    输入 [4] = 到整数 (编辑框D.内容)输入 [5] = 到整数 (编辑框E.内容)输入 [6] = 到整数 (编辑框F.内容)编辑框_算式.内容 = 删全部空 (编辑框_算式.内容)算式 = 编辑框

  • avatar
    访客 2022-07-01 下午 04:53:28

    量 局部_待加减乘除, 整数型.程序集变量 局部_点加减乘除, 文本型.程序集变量 局部_到小数, 双精度小数型.子程序 _按钮1_被单击.如果 (编辑框1.内容 ≠ “0”)    编辑框1.加入文本 (“1”).否则    编辑框1.内容 = “”    编辑框1.加入文本 (“1”).如果结束

发表评论