VerySource

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 1915|回复: 16

请问怎样可以判断一个TXT文件中有多少行文字?

[复制链接]

5

主题

16

帖子

10.00

积分

新手上路

Rank: 1

积分
10.00
发表于 2020-1-15 14:00:01 | 显示全部楼层 |阅读模式
请问怎样可以判断一个TXT文件中有多少行文字?

回复

使用道具 举报

0

主题

60

帖子

23.00

积分

新手上路

Rank: 1

积分
23.00
发表于 2020-1-18 17:54:01 | 显示全部楼层
用READLINE()一行一行读,
while循环里加个计数器变量,
回复

使用道具 举报

5

主题

16

帖子

10.00

积分

新手上路

Rank: 1

积分
10.00
 楼主| 发表于 2020-1-18 18:54:02 | 显示全部楼层
具体怎样写,,请帮忙
回复

使用道具 举报

0

主题

60

帖子

23.00

积分

新手上路

Rank: 1

积分
23.00
发表于 2020-1-18 21:45:01 | 显示全部楼层
C#的,要不
我写下

回复

使用道具 举报

0

主题

60

帖子

23.00

积分

新手上路

Rank: 1

积分
23.00
发表于 2020-1-19 09:45:02 | 显示全部楼层
private int countline(string fullfilename)
                {
                        System.IO.StreamReader sr=new System.IO.StreamReader(fullfilename);
                        int line=0;
                        while(sr.ReadLine()!=null)
                        {
                                line++;
                        }
                        return line;


                }

主函数调用


private void Page_Load(object sender, System.EventArgs e)
                {
                        // 在此处放置用户代码以初始化页面
                        int cc=countline(@"c:\1.txt");
                        Response.Write(cc);
                }

回复

使用道具 举报

5

主题

16

帖子

10.00

积分

新手上路

Rank: 1

积分
10.00
 楼主| 发表于 2020-1-19 16:00:01 | 显示全部楼层
有没有VB.NET的?
回复

使用道具 举报

0

主题

60

帖子

23.00

积分

新手上路

Rank: 1

积分
23.00
发表于 2020-1-19 17:18:01 | 显示全部楼层
转下很容易,网上搜个转代码的网站
回复

使用道具 举报

0

主题

60

帖子

23.00

积分

新手上路

Rank: 1

积分
23.00
发表于 2020-1-19 20:36:02 | 显示全部楼层
改下
private int countline(string fullfilename)
                {
                        System.IO.StreamReader sr=new System.IO.StreamReader(fullfilename);
                        int line=0;
                        while(sr.ReadLine()!=null)
                        {
                                line++;
                        }
                        return line;
                        sr.Close();


                }
回复

使用道具 举报

1

主题

4

帖子

5.00

积分

新手上路

Rank: 1

积分
5.00
发表于 2020-1-22 00:09:01 | 显示全部楼层
Dim dlg As New OpenFileDialog
        dlg.InitialDirectory = "c:\"
        dlg.Multiselect = False
        dlg.CheckFileExists = True
        If dlg.ShowDialog() = Windows.Forms.DialogResult.OK Then
            Dim fs As IO.FileStream = dlg.OpenFile()
            Dim bzData As Byte()
            ReDim bzData(fs.Length)
            fs.Read(bzData, 0, fs.Length - 1)
            Dim strFileData As String = System.Text.Encoding.ASCII.GetString(bzData)
            Dim res As System.Text.RegularExpressions.MatchCollection
            res = System.Text.RegularExpressions.Regex.Matches(strFileData, "\r\n")
            Dim strRes As String = String.Format("一共有{0:d}行。", res.Count + 1)
            MessageBox.Show(strRes)
        End If
回复

使用道具 举报

0

主题

4

帖子

3.00

积分

新手上路

Rank: 1

积分
3.00
发表于 2020-1-23 15:27:02 | 显示全部楼层
可以一次读取完,然后统计其中的回车换行符号的个数
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|CopyRight © 2008-2023|verysource.com ( 京ICP备17048824号-1 )

快速回复 返回顶部 返回列表