vb.net - 从 .txt 文件中读取长度超过一定数量的行

Question

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

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

1
1


1
1

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