Suche nach neuen line-position in einem VB.NET string-variable mit InStr

Ich habe eine Anwendung in VB.NET die bekommt die string-Daten aus der Datenbank. Dieser string hat Daten, die aussieht wie unten:

"Das ist das update:

Ich habe ein Problem mit der Anwendung"

Brauche ich nur einen Teil der Daten, nach der die neue Zeile z.B. "ich habe ein Problem mit der application".

Dafür bin ich mit der Suche die position mit InStr, wo der string-Daten in eine neue Zeile. Ich habe versucht, viele Optionen, aber Sie funktionieren nicht.

Habe ich "vbCrLf", Chr(13), "\r\n", "\n", "<br/>", Umwelt.NewLine, aber keiner von Ihnen arbeiten.

Wie bekomme ich die Daten die ich brauche?

hast du das Zitat vbCrLf? es sollte verwendet werden, withoud quoutes.
Ich havn ' T verwendet zitieren

InformationsquelleAutor | 2009-08-07

  1. 2

    VbCrLf verwenden und nicht "vbCrLf"

    Kann es auch sein, dass du nur line-feeds oder nur carrige returns also mit Chr(10) und Chr(13) kann auch eine bessere option sein.

    danke es funktioniert

    InformationsquelleAutor Thies

  2. 2

    Dem newline-Zeichen dargestellt werden kann, entweder nur durch ein newline-Zeichen (Chr(10)) oder ein Wagenrücklauf/Zeilenvorschub-paar (Chr(13) + Chr(10)). Je nach Quelle der Daten kann dies natürlich variieren. Ein Weg dies zu erreichen ist es, einen string split auf die zwei Zeichen mit der option zum entfernen von leeren Elementen, werfe den ersten Weg ein, und sich der andere zusammen mit newlines zwischen Ihnen:

    ReadOnly separators As Char() = New Char() {Chr(10), Chr(13)}
Private Function StripFirstLine(ByVal input As String) As String
    Dim parts() As String = input.Split(separators, StringSplitOptions.RemoveEmptyEntries)

    If parts.Length > 1 Then
        Return String.Join(Environment.NewLine, parts, 1, parts.Length - 1)
    Else
        Return input
    End If

End Function
    Es nicht CR+LF (Char(13) + Char(10)), nicht die andere Weise herum.
    Hat es geklappt...danke
    natürlich hast du Recht; blätterte es um. Muss die Hitze.
    In vb.net Sie können auch die einzelnen vbCr und vbLf Konstanten, anstatt rufen Sie die Funktion Chr ().

    InformationsquelleAutor Fredrik Mörk

  3. 1

    Ich glaube nicht, dass ich bin das hinzufügen von viel zu dieser Diskussion, aber für was es Wert ist... kann man auch verwenden, "ControlChars" wie in "ControlChars.CrLf".

    ControlChars @ MSDN

    InformationsquelleAutor Richard Lucas

  4. 1

    Dieses Skript gibt den string zurück, in Linien und fügen Sie ein Listenfeld:

        Dim fileContents As String
    fileContents = My.Computer.FileSystem.ReadAllText("d:\a.txt")
    TextBox2.Text = fileContents
    Dim a As Integer = 1

    For i = 1 To fileContents.Length
        Dim xx As String = Mid(fileContents, i, 1)
        If xx = Chr(10) Then
            If Mid(fileContents, i - 1, 1) = Chr(13) Then
                ListBox1.Items.Add(Mid(fileContents, a, (i - a) - 1))
                a = i
            End If
        End If
    Next

    InformationsquelleAutor medo_best

Schreibe einen Kommentar