文本操作，多行文本，取成员尾数相同最多的那个成员

wtgdphua · 发表于 2020-3-24 20:09:13

文本中有2种内容：
1.订单号2.编码
如果我想取订单号，尾数为5的，并且尾数5最多的那个要怎么写呢？

订单号：141651151
订单号：465161555
编码：64651584444
编码：54115444444
订单号：455555555
编码：41561545745
编码：15144444444
订单号：455555555
订单号：156315455
编码：11156456666
编码：54155411541
编码：44536455444
编码：54234275454
编码：45678254344
编码：15144444444
订单号：554561177
订单号：156465144

补充内容 (2020-3-24 20:11):
有没有源码，例如编辑框1内容为5，点击按钮，编辑框2的内容=5尾数最多的那个订单号

cated · 发表于 2020-3-24 20:09:14

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

变量名	类型	静态	数组	备注
TempText	文本型		0
i	整数型
单号	文本型
单号颠倒	文本型
j	整数型
Count	整数型
MaxCount	整数型
单号Save	文本型
TempFind	字节集

TempText ＝分割文本 (编辑框1.内容, #换行符, )
MaxCount ＝ 0

计次循环首 (取数组成员数 (TempText), i)

单号＝文本_取右边 (TempText [i], “：”, )

单号颠倒＝文本_颠倒 (单号)

TempFind ＝ { }

TempFind ＝到字节集 (单号颠倒)

Count ＝ 0

计次循环首 (取字节集长度 (TempFind), j)

如果 (到整数 (TempFind [j] － 48) ＝到整数 (编辑框2.内容))

Count ＝ Count ＋ 1

跳出循环 ()

计次循环尾 ()

如果真 (Count ＞ MaxCount)

MaxCount ＝ Count

单号Save ＝单号

计次循环尾 ()
信息框 (单号Save, 0, , )

补充内容 (2020-3-24 21:12):
我就想要你的精币没别的给我精币

wtgdphua · 发表于 2020-3-25 01:30:49

cated 发表于 2020-3-24 21:10
[e=4].版本 2

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

我，牛了老哥！！1！！

wtgdphua · 发表于 2020-3-25 01:31:45

wtgdphua 发表于 2020-3-25 01:30
我，牛了老哥！！1！！

老哥，这里还有50币
https://bbs.125.la/forum.php?mod ... ;page=1#pid18397227

wtgdphua · 发表于 2020-3-25 10:55:55

cated 发表于 2020-3-24 20:09
[e=4].版本 2

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

老哥，如果是这样，是不是应该先把文本分出两种数组，一种数组为订单号的，另一种数组为编码的，然后再接着写您的源码，得到的结果再弄到文本框。
或者有更简洁的思路呢？有代码不啦？

cated · 发表于 2020-3-25 12:46:55

wtgdphua 发表于 2020-3-25 10:55
老哥，如果是这样，是不是应该先把文本分出两种数组，一种数组为订单号的，另一种数组为编码的，然后 ...

这种好像最简单吧

wtgdphua · 发表于 2020-3-25 14:58:59

cated 发表于 2020-3-25 12:46
这种好像最简单吧

给代码我看看咯。。。。

wtgdphua · 发表于 2020-3-25 22:47:08

cated 发表于 2020-3-25 12:46
这种好像最简单吧

老哥，按照我给你的那个图，写一个这样的咯。。。

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

[完成] 文本操作，多行文本，取成员尾数相同最多的那个成员

最佳答案