Vb.net 在datagrid中显示txt文件的内容

Vb.net 在datagrid中显示txt文件的内容,vb.net,datagrid,notepad,Vb.net,Datagrid,Notepad,我是vb新手,在datagrid中显示.txt文件的内容时遇到问题 到目前为止,我已经可以创建一个.txt文件(如果不存在)并将textbox1的值保存到所述.txt文件的新行中 使用Dim appendText As String=“今天是:”+DateTime.Now+“|”+TextBox1.Text+Environment.NewLine,输出(在txt文件中)如下所示: 今天是:2015年9月25日上午9:28:35 |第一条消息 今天是:2015年9月25日上午9:28:41 |第二

我是vb新手,在datagrid中显示.txt文件的内容时遇到问题

到目前为止,我已经可以创建一个.txt文件(如果不存在)并将textbox1的值保存到所述.txt文件的新行中

使用
Dim appendText As String=“今天是:”+DateTime.Now+“|”+TextBox1.Text+Environment.NewLine
,输出(在txt文件中)如下所示:

今天是:2015年9月25日上午9:28:35 |第一条消息
今天是:2015年9月25日上午9:28:41 |第二条消息

等等

单击btnView(在datagrid中显示文件内容)时的输出是

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
但是我想以以下格式显示datagrid视图中的内容:

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


我在更改标题时遇到问题。如果有人能在这方面帮助我,我将不胜感激。

吉姆西林尼所说的是对的。在代码中,添加列时,会传递两个参数:columnName和headerText。用作标题的文本text是您将在列标题中看到的文本:

DataGridView1.Columns.Add("Column" & i + 1, "Column" & i + 1)
因此,标题文本是“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

希望这能帮助你

为什么你要告诉
String.Split
选项卡
字符上拆分,而你不是用这些字符来分隔数据?@jmcilhinney我已经在我的问题中编辑了代码。你能告诉我我做错了什么吗?我只是在编辑/更改要添加列的标题时遇到问题。它显示的正是您要它显示的内容。如果您希望它显示其他内容,请告诉它显示其他内容。此外,您还可以告诉您的
TextFieldParser
分隔符为“|”。这就是你在字段值之间放置的东西吗?“我想不是。”杰姆西林尼说。对不起,我只是vb新手,我还在研究。那好吧<代码>DateTime.Now+“|”+文本框1.Text