vb 读取txt文本的行数

方法一:

DimIAsLong
DimSAsString
I=0
Open"d:a.txt"ForInputAs#1
DoWhileNotEOF(1)
LineInput#1,S
I=I+1
Loop
Close#1
I就是行数.

方法二:

在VB里input(LOF(1),1)
里面的LOF(1)和外面的那个1分别代表什么意思?
简单的说就是 input(LOF(1),1) 中的两个1分别代表什么?

如果改成input(LOF(2),2)那是不是都指2号文件,读取2号文件所有的内容?

那当然……
=================
Input(LOF(1),1)

此时的 Input 是一个函数，返回指定文件中的指定个字符。

LOF 函数返回文件长度，参数为文件号。
Input 函数，第一参数为返回字符数，第二参数为文件号。

简言之，两个1都指第1号文件。

这个语句的意思是读取1号文件的所有内容。

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!