Question

怎么用易语言编一个加减乘除法啊，我已经设置好窗口了

Answer 1

.版本
2
.程序集
窗口程序集1
.子程序
__启动窗口_创建完毕
置随机数种子
()
'
本程序适合小学1-2年级加减乘除法。属于列程，和计算机相差甚远、
'
源码可随意改动！
.子程序
_按钮1_被单击
.局部变量
a,
整数型
a
＝
取随机数
(1,
4)
编辑框1.内容
＝
到文本
(取随机数
(0,
99))
编辑框3.内容
＝
到文本
(取随机数
(0,
99))
.如果
(a
＝
1)
编辑框2.内容
＝
“+”
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
＋
到数值
(编辑框3.内容))
.否则
.如果
(a
＝
2)
编辑框2.内容
＝
“-”
.如果真
(到数值
(编辑框1.内容)
＜
到数值
(编辑框3.内容))
.循环判断首
()
编辑框1.内容
＝
到文本
(取随机数
(0,
99))
.循环判断尾
(到数值
(编辑框1.内容)
＜
到数值
(编辑框3.内容))
.如果真结束
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
－
到数值
(编辑框3.内容))
.否则
.如果
(a
＝
3)
编辑框2.内容
＝
“×”
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
×
到数值
(编辑框3.内容))
.否则
.如果
(a
＝
4)
编辑框2.内容
＝
“÷”
编辑框1.内容
＝
到文本
(取随机数
(1,
99))
编辑框3.内容
＝
到文本
(取随机数
(1,
99))
.如果真
(到数值
(编辑框1.内容)
％
到数值
(编辑框3.内容)
≠
0)
.循环判断首
()
编辑框1.内容
＝
到文本
(取随机数
(1,
99))
编辑框3.内容
＝
到文本
(取随机数
(1,
99))
.循环判断尾
(到数值
(编辑框1.内容)
％
到数值
(编辑框3.内容)
≠
0)
.如果真结束
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
÷
到数值
(编辑框3.内容))
.否则
.如果结束
.如果结束
.如果结束
.如果结束

Answer 2

易语言菜单-插入-窗口，插入的窗口即为窗口1
并在窗口1上新建一个时钟
双击新建的窗口，输入代码：
.版本
2
.子程序
_时钟1_周期事件
_启动窗口.可视
＝
真
时钟1.时钟周期
＝
0
销毁
()
.子程序
_窗口1_创建完毕
时钟1.时钟周期
＝
3000
'
3000代表3秒
在原来的_启动窗口上，双击，写入代码：
.版本
2
.子程序
__启动窗口_创建完毕
_启动窗口.可视
＝
假
载入
(窗口1,
,
真)

Answer 3

.版本
2
.子程序
_按钮1_被单击
.如果
(编辑框2.内容
＝
“+”)
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
＋
到数值
(编辑框3.内容))
.否则
.如果
(编辑框2.内容
＝
“-”)
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
－
到数值
(编辑框3.内容))
.否则
.如果
(编辑框2.内容
＝
“*”)
'
lz应该知道*就是乘的意思吧
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
×
到数值
(编辑框3.内容))
.否则
.如果
(编辑框2.内容
＝
“/”)
'
lz应该知道/就是除的意思吧
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
÷
到数值
(编辑框3.内容))
.否则
信息框
(“您输入的符号有问题，必须是+、-、*、/。”,
0,
)
'
如果以上四个符号都不是，就提示这个
.如果结束
.如果结束
.如果结束
.如果结束
楼上几位都弄得太复杂了，我这个代码简单易懂~~~经过我的测试，没问题。lz选我~~

Answer 4

.版本
2
.程序集
窗口程序集1
.子程序
_按钮1_被单击
.判断开始
(编辑框2.内容
＝
“+”)
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
＋
到数值
(编辑框3.内容))
.判断
(编辑框2.内容
＝
“-”)
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
－
到数值
(编辑框3.内容))
.判断
(编辑框2.内容
＝
“*”)
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
×
到数值
(编辑框3.内容))
.判断
(编辑框2.内容
＝
“/”)
编辑框4.内容
＝
到文本
(到数值
(编辑框1.内容)
÷
到数值
(编辑框3.内容))
.默认
信息框
(“此计算器仅支持＋
－
×
÷
”,
0,
)
.判断结束