File.ReadLine 在 TextBlock 中的每行之后添加换行符

Question

我正在尝试读取文本文件并将信息显示在文本块中。例如，在这部分代码中，我使用 file.readlines 函数来查找所有 IPv4 条目并将它们放入文本块中。问题是当我运行代码时，我只看到最后一个 IPv4 地址，其他的都被删除了。我想让所有的线条都显示出来。我确定我错过了一些简单的东西。这是代码：

For Each line As String In File.ReadLines("c:\temp\logs\pcinfo.txt")
        If line.Contains("IPv4") And line.Contains(":") Then
            TextBlock1.Text = line
        End If
    Next line

Answer 1

您需要将行附加到文本框，而不是替换文本框中已有的内容。如果要多行，还需要加上换行符。

TextBlock1.Text &= line & vbCrLf

File.ReadLine 在 TextBlock 中的每行之后添加换行符

File.ReadLine to add line break after each line in TextBlock

vb.net

wpf