找回密码
 注册帐号
查看: 3560|回复: 6

[编程问题] 关于易语言编写计算器的问题(完整代码!!!!!!!)

[复制链接]
发表于 2011-7-28 19:46:26 | 显示全部楼层 |阅读模式
本帖最后由 火凤凰 于 2011-7-30 18:54 编辑


.版本 2

.程序集 窗口程序集1

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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“0”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“0”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束




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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“1”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“1”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束


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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“2”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“2”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束


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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“3”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“3”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束


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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“4”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“4”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束


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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“5”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“5”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束


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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“6”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“6”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束


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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“7”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“7”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束


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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“8”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“8”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束


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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
    编辑框主显示.加入文本 (“9”)
    编辑框记录加数.内容 = 编辑框主显示.内容
.否则
    编辑框主显示.加入文本 (“9”)
    编辑框记录被加数.内容 = 编辑框主显示.内容
.如果结束


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

.如果 (编辑框记录符号.内容 ≠ “”)
    编辑框主显示.内容 = “”
.否则

.如果结束
编辑框主显示.加入文本 (“.”)

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

.如果 (编辑框记录符号.内容 ≠ “”)
    _按钮18_被单击 ()
    编辑框记录符号.内容 = “”
    编辑框记录符号.加入文本 (“+”)
.否则
    编辑框记录符号.加入文本 (“+”)
.如果结束

编辑框记录被加数.内容 = 编辑框主显示.内容


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

.如果 (编辑框记录符号.内容 ≠ “”)
    _按钮18_被单击 ()
    编辑框记录符号.内容 = “”
    编辑框记录符号.加入文本 (“-”)
.否则
    编辑框记录符号.加入文本 (“-”)
.如果结束

编辑框记录被加数.内容 = 编辑框主显示.内容


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

.如果 (编辑框记录符号.内容 ≠ “”)
    _按钮18_被单击 ()
    编辑框记录符号.内容 = “”
    编辑框记录符号.加入文本 (“*”)
.否则
    编辑框记录符号.加入文本 (“*”)
.如果结束

编辑框记录被加数.内容 = 编辑框主显示.内容


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

.如果 (编辑框记录符号.内容 ≠ “”)
    _按钮18_被单击 ()
    编辑框记录符号.内容 = “”
    编辑框记录符号.加入文本 (“/”)
.否则
    编辑框记录符号.加入文本 (“/”)
.如果结束

编辑框记录被加数.内容 = 编辑框主显示.内容


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

.如果 (编辑框记录符号.内容 = “+”)
    编辑框主显示.内容 = 到文本 (到数值 (编辑框记录被加数.内容) + 到数值 (编辑框记录加数.内容))
.否则
    .如果 (编辑框记录符号.内容 = “-”)
        编辑框主显示.内容 = 到文本 (到数值 (编辑框记录被加数.内容) - 到数值 (编辑框记录加数.内容))
    .否则
        .如果 (编辑框记录符号.内容 = “*”)
            编辑框主显示.内容 = 到文本 (到数值 (编辑框记录被加数.内容) × 到数值 (编辑框记录加数.内容))
        .否则
            .如果 (编辑框记录符号.内容 = “/”)
                编辑框主显示.内容 = 到文本 (到数值 (编辑框记录被加数.内容) ÷ 到数值 (编辑框记录加数.内容))
            .否则

            .如果结束

        .如果结束

    .如果结束

.如果结束





请问当输入加数时为什么只能输入一位数字
怎么解决
谢谢!!
发表于 2011-7-28 21:59:40 | 显示全部楼层
编辑框属性看看,可能是被限制长度了
回复 支持 反对

使用道具 举报

 楼主| 发表于 2011-7-29 18:37:31 | 显示全部楼层
不是
第一次输入几位数都可以
回复 支持 反对

使用道具 举报

发表于 2011-7-29 22:54:15 | 显示全部楼层
最好把你的源码传上来,这东西前后都有联系的,但看着一段看不出来
回复 支持 反对

使用道具 举报

 楼主| 发表于 2011-7-30 18:47:31 | 显示全部楼层
现在我把整个代码都传上来了
请各位指教下为什么输入第二个数时只能保存一位数字
谢谢
回复 支持 反对

使用道具 举报

发表于 2011-7-31 07:06:21 | 显示全部楼层
本帖最后由 yves 于 2011-7-31 09:10 编辑

你把代码发我QQ邮箱吧,18602389@qq.com,计算器里按钮有数字、点、运算符、等号,你的组件明明不规范,按钮一堆不知道对应的是哪个。
最近在学习数据库部分,计算器也是两三个月前弄的,帮你看看
给你个参考的

本帖子中包含更多资源

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

×
回复 支持 反对

使用道具 举报

发表于 2011-8-1 16:01:31 | 显示全部楼层
楼上的这个不支持 键盘的!  哥的这个更好

本帖子中包含更多资源

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

×
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册帐号

本版积分规则

QQ|Archiver|手机版|小黑屋|依人网络官方网站 ( 陕ICP备19025998号-1 )

GMT+8, 2024-12-22 16:15 , Processed in 0.059389 second(s), 20 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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