求助，判断外部文本是否包含指定字符

ytm易小白

如图，
1：判断外部文本1.txt（路径和文件名都是固定的）的指定区域内容中，每行内容从“.”开始往后第三位数字是不是“8”或者“9”，如果包含就创建a.txt，不包含不做任何动作
2：判断外部文本1.txt（路径和文件名都是固定的）的指定区域内容中，每行内容从“.”开始往后第四位数字是不是“7”，如果包含就取这一行“C”后面的数字（比如：T04C1.3027这一行，取1.3）作为要创建txt的文件名，不包含不做任何动作

指定区域是指从文本第一行的“M48”开始到“%”所在行之间的内容

不知道这种能不能实现

LEOONL

ytm易小白 发表于 2024-7-22 22:21
是的。刚忘记了取到1.3后，要创建的文本是1.3+文字.txt，再加2个字，也就是1.3文字.txt
...

  

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

变量名	类 型	静态	数组	备 注
文本	文本型		0
n	整数型
代码	文本型
文件名	文本型

文本 ＝ 分割文本 (文本_取出中间文本 (到文本 (读入文件 (取运行目录 () ＋ “\1.txt”)), “M48” ＋ #换行符, #换行符 ＋ “%”), #换行符, )
计次循环首 (取数组成员数 (文本), n)
如果真 (取文本中间 (文本 [n], 寻找文本 (文本 [n], “.”, , 假) ＋ 3, 1) ＝ “8”)
写到文件 (取运行目录 () ＋ “\a.txt”, {  })
如果真 (取文本中间 (文本 [n], 寻找文本 (文本 [n], “.”, , 假) ＋ 4, 1) ＝ “7”)
文件名 ＝ 取文本中间 (文本 [n], 寻找文本 (文本 [n], “.”, , 假) － 1, 3)
写到文件 (取运行目录 () ＋ “\” ＋ 文件名 ＋ “文字.txt”, {  })

计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型, , "0"<br /> .局部变量 n, 整数型<br /> .局部变量 代码, 文本型<br /> .局部变量 文件名, 文本型<br /> <br /> 文本 ＝ 分割文本 (文本_取出中间文本 (到文本 (读入文件 (取运行目录 () ＋ “\1.txt”)), “M48” ＋ #换行符, #换行符 ＋ “%”), #换行符, )<br /> .计次循环首 (取数组成员数 (文本), n)<br />     .如果真 (取文本中间 (文本 [n], 寻找文本 (文本 [n], “.”, , 假) ＋ 3, 1) ＝ “8”)<br />         写到文件 (取运行目录 () ＋ “\a.txt”, {  })<br />     .如果真结束<br />     .如果真 (取文本中间 (文本 [n], 寻找文本 (文本 [n], “.”, , 假) ＋ 4, 1) ＝ “7”)<br />         文件名 ＝ 取文本中间 (文本 [n], 寻找文本 (文本 [n], “.”, , 假) － 1, 3)<br />         写到文件 (取运行目录 () ＋ “\” ＋ 文件名 ＋ “文字.txt”, {  })<br />     .如果真结束<br /> <br /> .计次循环尾 ()

LEOONL

比如：T04C1.3027这一行，取1.3  这个1.3是怎么取法  固定的 1.3 这样的三位文本小数？，另外你图的文本发文字发出来

ytm易小白

LEOONL 发表于 2024-7-22 22:11
比如：T04C1.3027这一行，取1.3  这个1.3是怎么取法  固定的 1.3 这样的三位文本小数？，另外你图的文本发 ...

M48
METRIC,LZ
VER,1
FMAT,2
T01C3.05
T03C1.301
T04C1.3027
T05C1.309
T06C1.308
DETECT,ON
ATC,ON
%
每个文本M48到%之间的内容是不同的
比如1.3它所在的位置是不变的，变的只是数字的不同

LEOONL

ytm易小白 发表于 2024-7-22 22:16
M48
METRIC,LZ
VER,1

我说这个1.3为什么不是 1.3027  是只取C后边三位数的文本吗

ytm易小白

LEOONL 发表于 2024-7-22 22:18
我说这个1.3为什么不是 1.3027  是只取C后边三位数的文本吗

是的。刚忘记了取到1.3后，要创建的文本是1.3+文字.txt，再加2个字，也就是1.3文字.txt

ytm易小白

LEOONL 发表于 2024-7-22 22:28
[e=0].版本 2

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

错误(10041): 调用子程序“文本_取出中间文本”时传递了过多的参数。

补充内容 (2024-7-22 22:44):
错误(10002): 指定子程序或类方法名称“文本_取出中间文本”未找到。    是提示这个

LEOONL

ytm易小白 发表于 2024-7-22 22:42
错误(10041): 调用子程序“文本_取出中间文本”时传递了过多的参数。

精易模块

ytm易小白

LEOONL 发表于 2024-7-22 22:43
精易模块

M48
METRIC,LZ
VER,1
FMAT,2
T01C3.05
T03C1.301
T04C1.308
T05C1.3037
T06C1.304
DETECT,ON
ATC,ON
%     1.txt在运行目录里，好像没有创建txt文件啊

LEOONL

ytm易小白 发表于 2024-7-22 22:51
M48
METRIC,LZ
VER,1

1.txt是你这些内容是吧？