Question

我一直在网上搜索一段时间，试图找出如何只读取.txt文件中长度超过0个字符的行到VB中的列表框中。我正在使用VS 2010，并且只想在列表框中读取包含内容的行。

例如，我想只读取标记为1的行。

Answer 1

您可以使用ReadAllLines和LINQ：

的组合

ListBox1.DataSource = IO.File.ReadAllLines("file.txt").Where(Function(x) x.Length > 0).ToList

要从第3行开始，请使用Skip：

IO.File.ReadAllLines("file.txt").Skip(2).Where(Function(x) x.Length > 0).ToList

Answer 2

所以你只想添加带文字的行：

Dim notEmptyLines = From line In IO.File.ReadLines(path)
                    Where Not String.IsNullOrWhiteSpace(line)

For Each line In notEmptyLines
    ListBox1.Items.Add(line)
Next

如果您还想计算空格，请将Not String.IsNullOrWhiteSpace(line)替换为line.Length <> 0。

从.txt文件中只读取超过一定数量的行

2 个答案: