取编辑框文本内容行数

wxhscc

假设编辑框1，有225行内容

标签1，标题=“存在”（ 取文本行数225 ）+“行”

点击按钮1，则复制50行内容到剪辑版，同时删除编辑框1里已经取到的这50行，

标签1，标题=“存在”（ 取文本行数175 ）+“行”

取到最后25行或15、26、47不足50行的时候，

标签1，标题=“存在”（ 取文本行数25 ）+“行”

弹出信息框提示，取完本次最后25行后，则无可取数据，然后结束程序


简单理解就是，每次取编辑框内容的50行到剪辑版，同时删除编辑框里被取的这50行内容，避免重复，
当编辑框内容剩余不足50行时，弹出信息框提示，取完则结束程序感谢彦祖来个例子

一线之隔

..................

花总

简单不能在简单了  一次从后面拿25，剩下的直接给个遍历，在赋值到编辑框，每次单击时，判断分割换行数量是否<25即可

空竹

问答区不是你这样用的 吃好喝号

空竹

        主题        版块        回复/查看       
最后发帖
悬赏        取编辑框文本内容行数        问答区        2
31
空竹
3 分钟前
        编辑框内容对比 附件 已关闭        问答区        7
117
xbwdl
1 小时前
        编辑框文本处理判断两个数值，符合条件留下 附件 已关闭        问答区        3
50
缺心i
3 小时前
        编辑框文本处理，去小数点乘法，怎么写最简易 附件 已关闭        问答区        8
70
wxhscc
3 小时前
        编辑框内容识别，计数 已关闭        问答区        5
251
wxhscc
2022-4-30 20:13
        取编辑框内容，一次一行 附件 已关闭        精币悬赏专区        6
225
Eeinl
2022-4-26 12:56
悬赏        删除编辑框内容 附件        问答区        4
241
Ls60
2022-4-20 12:07
        删除桌面指定文件 已关闭        问答区        3
231
影知
2022-3-18 19:38
        超级列表框插入，单行改多行 图片附件 已关闭        问答区        2
227
wxhscc
2022-3-18 14:01
        这两句正则怎么写 图片附件 ... 1 2 已关闭        问答区        16
435
Autism
2022-2-22 15:47
        有没有比文本分割更快的办法，求助大佬 附件 已关闭        问答区        8
378
wxhscc
2022-2-22 01:00
        大批量快速提取编辑框指定内容 图片附件 已关闭        问答区        3
170
ly445414237
2022-2-20 10:37
        编辑框文本识别判断 图片附件 ... 1 2 已关闭        问答区        13
434
真冬
2022-2-20 04:50
        取出编辑框内容，指定位子数字的总和 附件 已关闭        问答区        2
248
迪迦是信仰
2022-1-17 13:05
        删除编辑框行开头为指定内容的文字 附件 已关闭        问答区        5
222
天外孤鸿PLUS
2022-1-15 21:14
        判断编辑框行内容开头 已关闭        问答区        1
209
nikezhi
2021-12-31 17:23
        编辑框删空行，不影响文本行内容 附件 已关闭        问答区        2
218
wxhscc
2021-12-31 10:32
        编辑框文本分割 附件 已关闭        问答区        3
278
撒加
2021-12-7 12:02
        编辑框内容处理 附件 已关闭        问答区        5
245
wxhscc
2021-12-5 11:33
        删除编辑框文本的空白行 附件 已关闭

空竹

你都问了几百个问题了 都是些编辑框的 你现在这个都不会?

cqcc

文本取行数（）/50   先取出来余下的，再每次取50完事！

花总

  

变量名	类 型	静态	数组	备 注
split	文本型		0
i	整数型
sum	整数型
save	文本型
y	文本型
sumi	整数型

split ＝ 分割文本 (编辑框1.内容, #换行符, )
如果 (取数组成员数 (split) ≥ 5)
计次循环首 (取数组成员数 (split), i)
如果 (i ＞ 5)
y ＝ y ＋ split [i] ＋ #换行符
save ＝ save ＋ split [i] ＋ #换行符
' 置剪辑板文本 (save)

计次循环尾 ()
编辑框1.内容 ＝ y
信息框 (“不足5”, 0, , )

.版本 2<br /> <br /> .局部变量 split, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 sum, 整数型<br /> .局部变量 save, 文本型<br /> .局部变量 y, 文本型<br /> .局部变量 sumi, 整数型<br /> <br /> split ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .如果 (取数组成员数 (split) ≥ 5)<br />     .计次循环首 (取数组成员数 (split), i)<br />         .如果 (i ＞ 5)<br />             y ＝ y ＋ split <i> ＋ #换行符<br />         .否则<br />             save ＝ save ＋ split <i> ＋ #换行符<br />             ' 置剪辑板文本 (save)<br />         .如果结束<br /> <br />     .计次循环尾 ()<br />     编辑框1.内容 ＝ y<br /> .否则<br />     信息框 (“不足5”, 0, , )

958389481

楼主看看吖

wxhscc

空竹 发表于 2022-9-2 14:01
问答区不是你这样用的 吃好喝号

到T7秒变大神