分割的小功能大家进来看看

hueitailang · 发表于 2014-3-21 21:19:30

zlishi1----123456789----803
zlishi2----123456789----593
zlishi3----123456789----250
zlishi4----123456789----693

把分割【3】取出来/200    例如：803/200=4.015就在编辑框2里面输入以下内容
zlishi1----123456789----aa
zlishi1----123456789----aa
zlishi1----123456789----aa
zlishi1----123456789----aa

例如：593/200=2.965  小于3  就在编辑框2里面输入以下内容
zlishi2----123456789----aa
zlishi2----123456789----aa
2次

例如：693/200=3.465  小于4  就在编辑框2里面输入以下内容
zlishi4----123456789----aa
zlishi4----123456789----aa
zlishi4----123456789----aa
3次

蕃茄炒饭 · 发表于 2014-3-21 21:19:31

已修改

当年月光 · 发表于 2014-3-21 21:37:16

看看效果吧理解应该没错吧

当年月光 · 发表于 2014-3-21 21:37:47

[e]
.版本 2
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 wb, 文本型, , "0"
.局部变量 n
.局部变量 wb1, 文本型
.局部变量 a
.局部变量 wb3, 文本型

wb3 ＝ “zlishi1----123456789----aa”
wb ＝分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (wb), n)
wb1 ＝文本_取右边 (wb [n], “9----”, , )
a ＝到整数 (wb1) ÷ 200
调试输出 (a)
.如果真 (a ＝ 1)
      编辑框2.加入文本 (到文本 (n) ＋ #换行符＋ wb3 ＋ #换行符)
.如果真结束
.如果真 (a ＝ 2)
      编辑框2.加入文本 (到文本 (n) ＋ #换行符＋ wb3 ＋ #换行符＋ wb3 ＋ #换行符)
.如果真结束
.如果真 (a ＝ 3)
      编辑框2.加入文本 (到文本 (n) ＋ #换行符＋ wb3 ＋ #换行符＋ wb3 ＋ #换行符＋ wb3 ＋ #换行符)
.如果真结束
.如果真 (a ＝ 4)
      编辑框2.加入文本 (到文本 (n) ＋ #换行符＋ wb3 ＋ #换行符＋ wb3 ＋ #换行符＋ wb3 ＋ #换行符＋ wb3 ＋ #换行符)
.如果真结束

.计次循环尾 ()
[/e]

hueitailang · 发表于 2014-3-21 21:42:22

当年月光发表于 2014-3-21 21:37
看看效果吧理解应该没错吧

错了是要输出
zlishi1----123456789----aa
zlishi1----123456789----aa
zlishi1----123456789----aa
zlishi1----123456789----aa
zlishi2----123456789----aa
zlishi2----123456789----aa
zlishi3----123456789----aa
zlishi4----123456789----aa
zlishi4----123456789----aa
zlishi4----123456789----aa

这个aa可以自定义

不要输出1 2 3 4数字

hueitailang · 发表于 2014-3-21 21:47:35

当年月光发表于 2014-3-21 21:37
[e]
.版本 2
.支持库 spec

批量查询的

有zlishi5 .... 6 7 8 9 等

hueitailang · 发表于 2014-3-22 11:38:20

分割.zip (1.95 KB, 下载次数: 1)

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

[已解决] 分割的小功能大家进来看看

最佳答案

评分

点评

[已解决] 分割的小功能 大家进来看看

最佳答案

评分

点评

[已解决] 分割的小功能大家进来看看