易语言用最简单的办法删除最前面所有的空行,如下:

比如:
文本型变量a 第一行到第N行全都是空行,
我现在只想删除前面的这些空行,
让有数据的第N+1行 变为第一行到剩下的内容。赋值给文本型变量b

这个事件可以有很多种办法实现,但是我写出来的都比较麻烦,看的不明了。

怎么样处理才能让程序结构最简单,哪位大神想到好办法了吗。
另外,我有一个文本,里面有很多行内容,我想将其分割两个文本,第一个文本为100行,剩下的内容为第二个文本。

我设想将这个文本每行分成数组的一个成员,然后提取前100个成员赋值给第一文本,
后面剩下的成员赋值给另一个文本 这个后面的部分不知掉该怎么写,麻烦高人写两句。

试试看这个可不可以用。

删首空 (a)


另外,我有一个文本,里面有很多行内容,我想将其分割两个文本,第一个文本为100行,剩下的内容为第二个文本。

你的这个问题看看这样行不行


.版本 2


.局部变量 原始文本, 文本型

.局部变量 数组每行文本, 文本型, , "0"

.局部变量 文本前一百行, 文本型

.局部变量 文本一百行后, 文本型

.局部变量 n, 整数型


数组每行文本 = 分割文本 (原始文本, #换行符, )

.如果 (取数组成员数 () < 100)

    信息框 (“原始文本少于100行”, 0, )

.否则

    .计次循环首 (100, n)

        文本前一百行 = 文本前一百行 + 数组每行文本 [n] + #换行符

    .计次循环尾 ()

    .计次循环首 (取数组成员数 (数组每行文本), n)

        文本一百行后 = 文本一百行后 + 数组每行文本 [100 + n] + #换行符

    .计次循环尾 ()

.如果结束

追问

这个是删空格,不是删首空行的
这个问题上面的朋友解决了。

我想请教你另一个问题:
我有一个文本,里面有很多行内容,我想将其分割两个文本,第一个文本为100行,剩下的内容为第二个文本。
我设想将这个文本每行分成数组的一个成员,然后提取前100个成员赋值给第一文本,
后面剩下的成员赋值给另一个文本 这个后面的部分不知掉该怎么写,麻烦高人写两句。

追答

加个判断就行了

.版本 2


.局部变量 原始文本, 文本型

.局部变量 删空文本, 文本型


删空文本 = 删首空 (原始文本)

.判断循环首 (删空文本 ≠ 原始文本)

    原始文本 = 删首空 (删空文本)

    删空文本 = 删首空 (原始文本)

.判断循环尾 ()

追问

非常感谢大神的回答,
综合你们两人的回答,我修改了一下:

.判断循环首 (取代码 (wb, 1) = 13 或 取代码 (wb, 1) = 32)
wb = 取文本右边 (wb, 取文本长度 (wb) - 2)
.判断循环尾 ()

这样可以除去最开始的所有空行和空格,达到了我最想要达到的目的,献给后面看问题的人。

百度最坑的就是不能同时采纳多个人,上面的回答的快一点,不好意思了。非常感谢你!

温馨提示:答案为网友推荐,仅供参考
第1个回答  推荐于2016-06-05

.局部变量 文本, 文本型

文本 = 编辑框1.内容

.判断循环首 (取代码 (文本, 1) = 13)

    文本 = 取文本右边 (文本, 取文本长度 (文本) - 2)

.判断循环尾 ()

编辑框1.内容 = 文本

 

追问

还有一个问题要麻烦一下:

另外,我有一个文本,里面有很多行内容,我想将其分割两个文本,第一个文本为100行,剩下的内容为第二个文本。

我设想将这个文本每行分成数组的一个成员,然后提取前100个成员赋值给第一文本,
后面剩下的成员赋值给另一个文本 这个后面的部分不知掉该怎么写,麻烦高人写两句。

追答

主要是找那个比较长的作文找了很久……

好吧,本来是想你自己来试的,勤奋的找了一点东西放在了编辑框上

发现我看错问题了,等下哈

追问

嗯嗯。感谢!
不过你上传的附件我全下载不了。
代码不长的话,直接复制代码吧。

追答

.局部变量 内容1, 文本型
.局部变量 内容2, 文本型
.局部变量 I
.局部变量 文本, 文本型
文本 = 编辑框1.内容
.计次循环首 (100, )
I = 寻找文本 (文本, #换行符, I, 假)
.计次循环尾 ()
内容1 = 取文本左边 (文本, I)
内容2 = 取文本右边 (文本, 取文本长度 (文本) - I)
输出调试文本 (I, 内容1, 内容2)

本回答被提问者采纳
相似回答