Question

我在vb中是全新的，并且在datagrid中显示.txt文件的内容时出现问题。

到目前为止，我已经可以创建.txt文件（如果不存在）并将textbox1的值保存到上述.txt文件中的新行

使用Dim appendText As String = "Today is: " + DateTime.Now + " | " + TextBox1.Text + Environment.NewLine，输出（在txt文件中）如下所示：

今天是：9/25/2015 9:28:35 AM |第一条消息
今天是：9/25/2015 9:28:41 AM |第二条消息

依旧......

点击btnView（在数据网格中显示文件内容）时的输出是

column1标题：Column1
  column2标题：Column2
  第1栏第1行：今天是：2015年9月25日上午9:28:35   第2列第1行：第一条消息
  第2栏第2行：今天是：2015年9月25日上午9:28:41   第2列第2行：第二条消息

使用代码：

 Dim TextFieldParser1 As New Microsoft.VisualBasic.FileIO.TextFieldParser("survey.txt")
        TextFieldParser1.Delimiters = New String() {"|"}
        While Not TextFieldParser1.EndOfData

            Dim Row1 As String() = TextFieldParser1.ReadFields()
            If DataGridView1.Columns.Count = 0 AndAlso Row1.Count > 0 Then
                Dim i As Integer
                For i = 0 To Row1.Count - 1
                    DataGridView1.Columns.Add("Column" & i + 1, "Column" & i + 1)
                Next
            End If
            DataGridView1.Rows.Add(Row1)
        End While

但是我希望以这种格式显示数据网格视图中的内容：

column1标题：日期和时间
  column2标题：消息
  第1栏第1行：今天是：2015年9月25日上午9:28:35   第2列第1行：第一条消息
  第2栏第2行：今天是：2015年9月25日上午9:28:41   第2列第2行：第二条消息

我在更改标题方面遇到了麻烦。如果有人能帮助我，我会非常感激。

Answer 1

jmcilhinney说的是对的。在您的代码中，添加列时，您传递两个参数：columnName和headerText。您用作headerText的文本是您将在列标题中看到的文本：

DataGridView1.Columns.Add("Column" & i + 1, "Column" & i + 1)

因此，headerText是“Column1”或“Column2”。这就是你传递的价值以及你现在所获得的价值。

我要做什么：

我会在块中添加列“while..end while”，之后，我会填充网格：

DataGridView1.Columns.Add("Column1", "Date and Time")
DataGridView1.Columns.Add("Column2", "Message")

While Not textFieldParser1.EndOfData
    Dim content As String() = textFieldParser1.ReadFields
    DataGridView1.Rows.Add(content)
End While

希望这可以帮到你

在datagrid中显示txt文件的内容

1 个答案: