在VB中如何获取文本的行数？
作了个程序，想点击按钮，然后弹出MSGBOX，说明目前文件已添加了多少行文本。这个应该怎么写？是TXT文本，我在文本中会不定期的添加一些内容，请大侠们赐教，谢谢！...
作了个程序，想点击按钮，然后弹出MSGBOX，说明目前文件已添加了多少行文本。这个应该怎么写？是TXT文本，我在文本中会不定期的添加一些内容，请大侠们赐教，谢谢！
展开
1个回答
展开全部
open ...... as #1
linenum =0 'dim linenum as integer
do until eof(1)
line input #1,buff 'dim buff as string
linenum = linenum +1
loop
close
linenum =0 'dim linenum as integer
do until eof(1)
line input #1,buff 'dim buff as string
linenum = linenum +1
loop
close
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
