如何在vb.net中准确提取消息

Question

下面是我的文本框，我存储了我的序列

的输出

下面是我把消息放在DataGridView里面的问题所在这里看到网格的最后一行有一个OK文本。

我的上一张照片显示了我的文字行的价值。

        Dim LineOfText As String
        Dim i As Integer
        Dim aryTextFile() As String

        LineOfText = tt.Text

        aryTextFile = Split(LineOfText, "+CMGL", , CompareMethod.Text)
        dgv.Rows.Clear()

        For i = 1 To UBound(aryTextFile)

            '**********************
            Dim LineOfTexts As String
            Dim aryTextFiles() As String
            LineOfTexts = aryTextFile(i)
            aryTextFiles = Split(LineOfTexts, """", , CompareMethod.Text)
            aryTextFiles(5) = aryTextFiles(5).Substring(0, 17).Replace(",", "-")

            dgv.Rows.Add(New String() {aryTextFiles(3), aryTextFiles(6), aryTextFiles(5)})


        Next i

有没有其他方法可以准确提取消息？ aryTextFiles（3）是电话号码/发件人aryTextFiles（6）是消息，aryTextFiles（5）是日期和时间。

Answer 1

您可以使用Trim（）删除最后一个单词

LineOfText = tt.Text.Substring(0, tt.Text.LastIndexOf(vbCrLf) - 3).Trim()  

我用-3修剪了最后3个字符。