精易论坛

标题: 继续小问题 [打印本页]

---

作者: a7897s    时间: 2025-3-23 21:42
标题: 继续小问题
按下计算按钮。超级列表框总价那一列 除以编辑框1-8的内容数字  再乘以0.99   结果四舍五入保留小数点后两位 循环读入超级列表框结果那一列

例：2500/30*0.99=82.49999  结果为82.50

232323.png (7.38 KB, 下载次数: 0)

下载附件

2025-3-23 21:37 上传

---

作者: 是可可吖    时间: 2025-3-23 21:42

  

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

变量名	类 型	静态	数组	备 注
i	整数型

计次循环首 (超级列表框1.取表项数 (), i)
如果真 (i ＝ 1)
超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框1.内容) × 0.99, 2)))
如果真 (i ＝ 2)
超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框2.内容) × 0.99, 2)))
如果真 (i ＝ 3)
超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框3.内容) × 0.99, 2)))
如果真 (i ＝ 4)
超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框4.内容) × 0.99, 2)))
如果真 (i ＝ 5)
超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框5.内容) × 0.99, 2)))
如果真 (i ＝ 6)
超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框6.内容) × 0.99, 2)))
如果真 (i ＝ 7)
超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框7.内容) × 0.99, 2)))
如果真 (i ＝ 8)
超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框8.内容) × 0.99, 2)))

计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (超级列表框1.取表项数 (), i)<br />     .如果真 (i ＝ 1)<br />         超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框1.内容) × 0.99, 2)))<br />     .如果真结束<br />     .如果真 (i ＝ 2)<br />         超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框2.内容) × 0.99, 2)))<br />     .如果真结束<br />     .如果真 (i ＝ 3)<br />         超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框3.内容) × 0.99, 2)))<br />     .如果真结束<br />     .如果真 (i ＝ 4)<br />         超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框4.内容) × 0.99, 2)))<br />     .如果真结束<br />     .如果真 (i ＝ 5)<br />         超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框5.内容) × 0.99, 2)))<br />     .如果真结束<br />     .如果真 (i ＝ 6)<br />         超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框6.内容) × 0.99, 2)))<br />     .如果真结束<br />     .如果真 (i ＝ 7)<br />         超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框7.内容) × 0.99, 2)))<br />     .如果真结束<br />     .如果真 (i ＝ 8)<br />         超级列表框1.置标题 (i － 1, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (i － 1, 1)) ÷ 到整数 (编辑框8.内容) × 0.99, 2)))<br />     .如果真结束<br /> <br /> .计次循环尾 ()

是这样吧？

---

作者: a7897s    时间: 2025-3-23 21:43
写好代码截图

---

作者: a7897s    时间: 2025-3-23 21:45

a7897s 发表于 2025-3-23 21:43
写好代码截图

结果那一列是空的  没有数字0 不用管他

---

作者: a7897s    时间: 2025-3-23 21:46

a7897s 发表于 2025-3-23 21:45
结果那一列是空的  没有数字0 不用管他

不对，要管他  因为要随时计算新结果

---

作者: xianggu    时间: 2025-3-23 21:48

a7897s 发表于 2025-3-23 21:43
写好代码截图

我就搞不懂了, 你是来提问的还是来命令别人的

---

作者: a7897s    时间: 2025-3-23 21:50

xianggu 发表于 2025-3-23 21:48
我就搞不懂了, 你是来提问的还是来命令别人的

自己学不会 只能多求教，，，，

---

作者: xianggu    时间: 2025-3-23 21:55
dome.e (150.98 KB, 下载次数: 1)

2025-3-23 21:55 上传

点击文件名下载附件
下载积分: 精币 -1 枚

补充内容 (2025-3-23 21:57):
超级列表框1.置标题 (0, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标题 (0, 1)) ÷ 到整数 (编辑框1.内容) × 0.99, 2)))

---

作者: a7897s    时间: 2025-3-23 21:59

xianggu 发表于 2025-3-23 21:55
补充内容 (2025-3-23 21:57):
超级列表框1.置标题 (0, 2, 到文本 (四舍五入 (到整数 (超级列表框1.取标 ...

*0.99

还要循环。编辑框1-8 结果那一列  都算出来

---

作者: Ruang    时间: 2025-3-23 22:39

用寻找组件方式

demo.e

2025-3-23 22:38 上传

点击文件名下载附件

下载积分: 精币 -1 枚

6.47 KB, 下载次数: 0, 下载积分: 精币 -1 枚

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4