论坛 › 已解决问题区 › 求教文本行号问题

ndyndy 发表于 2009-7-13 13:16:31

求教文本行号问题

本帖最后由 ndyndy 于 2009-7-13 14:13 编辑

小弟在学习编程是碰到一个问题在此请教就是能不能知道关键字所在的行号，比如：
aaaa
bbbb
ccccc
dddd
只要知道关键字“cccc”就能计算出它在第三行。
另外怎样能够做到提取“aaaa”与“dddd“之间的字符，也就是：
bbbb
ccccc

lynfr8 发表于 2009-7-13 14:00:03

#include <String.au3>
#include <Array.au3>
#Include <File.au3>
Dim $aArray2
$File = FileRead('test.txt')
Local $aArray1 = _StringBetween($File, 'aaaa', 'dddd')
_ArrayDisplay($aArray1, 'Search')
_FileReadToArray('test.txt', $aArray2)
For $x = 1 to $aArray2
If$aArray2[$x]='ccccc' Then
    Msgbox(4,'搜索结果', '行数:' & $x&@CRLF&$aArray2[$x])
EndIf
Next

ndyndy 发表于 2009-7-13 14:05:03

这么快就出来了，五体投地

查看完整版本: 求教文本行号问题