怎么比较判断 数字 大小

sphinxes

编辑框1的数字 是45.3   编辑框2.数字是53
怎么判断大小  然后把 小的数  进行 四舍五入 再填在 编辑框3
谢谢

Marvin

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
数1	双精度小数型
数2	双精度小数型
小数	双精度小数型

数1 ＝ 45.3
数2 ＝ 53
如果 (数1 ＜ 数2)
小数 ＝ 四舍五入 (数1, 0)
编辑框3.内容 ＝ 到文本 (小数)
调试输出 (“较小的数是数1: ” ＋ 到文本 (数1), “四舍五入后: ” ＋ 编辑框3.内容)
小数 ＝ 四舍五入 (数2, 0)
编辑框3.内容 ＝ 到文本 (小数)
调试输出 (“较小的数是数2: ” ＋ 到文本 (数2), “四舍五入后: ” ＋ 编辑框3.内容)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> .局部变量 数1, 双精度小数型<br /> .局部变量 数2, 双精度小数型<br /> .局部变量 小数, 双精度小数型<br /> <br /> 数1 ＝ 45.3<br /> 数2 ＝ 53<br /> <br /> .如果 (数1 ＜ 数2)<br />     小数 ＝ 四舍五入 (数1, 0)<br />     编辑框3.内容 ＝ 到文本 (小数)<br />     调试输出 (“较小的数是数1: ” ＋ 到文本 (数1), “四舍五入后: ” ＋ 编辑框3.内容)<br /> .否则<br />     小数 ＝ 四舍五入 (数2, 0)<br />     编辑框3.内容 ＝ 到文本 (小数)<br />     调试输出 (“较小的数是数2: ” ＋ 到文本 (数2), “四舍五入后: ” ＋ 编辑框3.内容)<br /> .如果结束

a2083657

编辑框1和2内容转数值，取较小者，加0.5取整即可。

.版本 2
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 a, 双精度小数型
.局部变量 b, 双精度小数型
.局部变量 minVal, 双精度小数型

a = 到数值 (编辑框1.内容)
b = 到数值 (编辑框2.内容)
.如果真 (a < b)
    minVal = a
.否则
    minVal = b
.如果真结束
编辑框3.内容 = 到文本 (取整 (minVal + 0.5))

AMEN.@

  

子程序名	返回值类型	公开	备 注
子程序1	文本型

变量名	类 型	静态	数组	备 注
a	文本型
b	文本型
flag	整数型
x	文本型

a ＝ “45.3”
b ＝ “53”
x ＝ a
flag ＝ 文本比较 (a, b, 真)
如果真 (flag ＞ 0)
x ＝ b
调试输出 (“最小的：”, x)
返回 (x)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1, 文本型<br /> .局部变量 a, 文本型<br /> .局部变量 b, 文本型<br /> .局部变量 flag, 整数型<br /> .局部变量 x, 文本型<br /> <br /> a ＝ “45.3”<br /> b ＝ “53”<br /> x ＝ a<br /> flag ＝ 文本比较 (a, b, 真)<br /> .如果真 (flag ＞ 0)<br />     x ＝ b<br /> .如果真结束<br /> 调试输出 (“最小的：”, x)<br /> 返回 (x)

白宝宝

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
变量1	小数型
变量2	小数型
变量3	小数型

变量1 ＝ 到小数 (编辑框1.内容)
变量2 ＝ 到小数 (编辑框2.内容)
调试输出 (变量1, 变量2)
如果真 (变量1 ＞ 变量2)
调试输出 (“编辑框1大于编辑框2的值”)
变量3 ＝ 四舍五入 (变量2, 0)
编辑框3.内容 ＝ 到文本 (变量3)
如果真 (变量1 ＜ 变量2)
调试输出 (“编辑框1小于编辑框2的值”)
变量3 ＝ 四舍五入 (变量1, 0)
编辑框3.内容 ＝ 到文本 (变量3)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 变量1, 小数型<br /> .局部变量 变量2, 小数型<br /> .局部变量 变量3, 小数型<br /> <br /> <br /> 变量1 ＝ 到小数 (编辑框1.内容)<br /> 变量2 ＝ 到小数 (编辑框2.内容)<br /> 调试输出 (变量1, 变量2)<br /> <br /> .如果真 (变量1 ＞ 变量2)<br />     调试输出 (“编辑框1大于编辑框2的值”)<br />     变量3 ＝ 四舍五入 (变量2, 0)<br />     编辑框3.内容 ＝ 到文本 (变量3)<br /> <br /> .如果真结束<br /> .如果真 (变量1 ＜ 变量2)<br />     调试输出 (“编辑框1小于编辑框2的值”)<br />     变量3 ＝ 四舍五入 (变量1, 0)<br />     编辑框3.内容 ＝ 到文本 (变量3)<br /> <br /> .如果真结束

AMEN.@

  

子程序名	返回值类型	公开	备 注
子程序1	文本型

变量名	类 型	静态	数组	备 注
a	文本型
b	文本型
flag	整数型
x	文本型

a ＝ “45.3”
b ＝ “53”
x ＝ a
flag ＝ 文本比较 (a, b, 真)
如果真 (flag ＞ 0)
x ＝ b
调试输出 (“最小的：”, x)
x ＝ 到文本 (四舍五入 (到小数 (x), ))
调试输出 (“四舍五入后：”, x)
返回 (x)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1, 文本型<br /> .局部变量 a, 文本型<br /> .局部变量 b, 文本型<br /> .局部变量 flag, 整数型<br /> .局部变量 x, 文本型<br /> <br /> a ＝ “45.3”<br /> b ＝ “53”<br /> x ＝ a<br /> flag ＝ 文本比较 (a, b, 真)<br /> .如果真 (flag ＞ 0)<br />     x ＝ b<br /> .如果真结束<br /> 调试输出 (“最小的：”, x)<br /> x ＝ 到文本 (四舍五入 (到小数 (x), ))<br /> 调试输出 (“四舍五入后：”, x)<br /> 返回 (x)