高考问答陈赫出轨反而更火:VB的查找问题
来源：百度文库 编辑：高考问答 时间：2024/05/06 05:07:01
怎样利用VB在文本文件(*.txt)里查找，并且打印出它的前一个字符？我感激不尽！！！
有没有源代码？
有没有源代码？
Dim FN,Ls As String 'File name full Path & file name. "C:\ab.txt"
Dim N As Intager
N=FreeFile
Open FN for input As #N
While NOT Eof(N)
Line Input #1,LS
'-------------------------------
'LS里已经是Ab.txt里的内容了
'这个循环会一行行的读出文件里内容
debug.print mid(LS,1,1) '返回值你自己解决吧
'--------------------------------
Wend
Close #1
用FSO组件,的READLINE方法读取第一行,然后用LEFT取第一行的第一个字符即可.