计算器例程非常震撼开源代码给个例程非常实用1

zhugeliang · 发表于 2018-4-1 17:28:52

源码：
.版本 2
.程序集窗口程序集_启动窗口
.子程序 _按钮1_被单击
显示框.加入文本 (“1”)

.子程序 _按钮8_被单击
显示框.加入文本 (“2”)

.子程序 _按钮13_被单击
显示框.加入文本 (“3”)

.子程序 _按钮4_被单击
显示框.加入文本 (“4”)

.子程序 _按钮7_被单击
显示框.加入文本 (“5”)

.子程序 _按钮12_被单击
显示框.加入文本 (“6”)

.子程序 _按钮3_被单击
显示框.加入文本 (“7”)

.子程序 _按钮6_被单击
显示框.加入文本 (“8”)

.子程序 _按钮11_被单击
显示框.加入文本 (“9”)

.子程序 _按钮2_被单击
显示框.加入文本 (“0”)

.子程序 _按钮5_被单击
显示框.加入文本 (“.”)

.子程序 _按钮9_被单击
数一.内容＝显示框.内容
符号.内容＝ “+”
显示框.内容＝ “”

.子程序 _按钮17_被单击
数一.内容＝显示框.内容
符号.内容＝ “-”
显示框.内容＝ “”

.子程序 _按钮16_被单击
数一.内容＝显示框.内容
符号.内容＝ “*”
显示框.内容＝ “”

.子程序 _按钮10_被单击
数一.内容＝显示框.内容
符号.内容＝ “/”
显示框.内容＝ “”

.子程序 _按钮18_被单击
.如果 (符号.内容＝ “+”)
显示框.内容＝到文本 (到数值 (数一.内容) ＋到数值 (显示框.内容))
.否则
.如果 (符号.内容＝ “-”)
      显示框.内容＝到文本 (到数值 (数一.内容) －到数值 (显示框.内容))
.否则
      .如果 (符号.内容＝ “*”)
         显示框.内容＝到文本 (到数值 (数一.内容) × 到数值 (显示框.内容))
      .否则
         .如果 (显示框.内容 ≠ “0”)
            .如果 (符号.内容＝ “/”)
                  显示框.内容＝到文本 (到数值 (数一.内容) ÷ 到数值 (显示框.内容))
            .否则
            .如果结束
         .否则
         .如果结束

      .如果结束
.如果结束
.如果结束

.子程序 _按钮14_被单击
显示框.内容＝ “”
数一.内容＝ “”
符号.内容＝ “”

.子程序 _按钮15_被单击
显示框.内容＝取文本左边 (显示框.内容, 取文本长度 (显示框.内容) － 1)

panda92 · 发表于 2020-4-6 13:21:58

谢谢分享，已下载

sqyclycd · 发表于 2018-5-24 22:22:51

谢谢分享，已下载

taodile · 发表于 2018-4-11 11:48:31

先谢楼主分享

ruyan666 · 发表于 2018-4-10 05:00:51

看到你这个帖子我突然安耐不住自己的双手前来水一波

网络注册会员 · 发表于 2018-4-4 09:56:14

看一下顶哦

wjswzj0 · 发表于 2018-4-2 11:58:16

先谢楼主分享

AHHFLQ · 发表于 2018-4-2 09:53:45

先谢楼主分享

我已更新 · 发表于 2018-4-1 20:24:54

咦，看到你这个帖子我突然安耐不住自己的双手前来水一波

zhugeliang · 发表于 2018-4-1 17:48:44

这个例程的意思是只要你按一个键，显示框上就会出现数字。

zhugeliang · 发表于 2018-4-1 17:47:19

我是作者我是作者挺好用

		自动登录	找回密码
密码			注册

[易语言纯源码] 计算器例程 非常震撼 开源代码 给个例程 非常实用1

[易语言纯源码] 计算器例程非常震撼开源代码给个例程非常实用1