Diskuze: chyba pri zmazani prvheho riadku suboru vo vb.net

V předchozím kvízu, Test znalostí C# .NET online, jsme si ověřili nabyté zkušenosti z kurzu.

Aktivity

3012

Člen

3012:27.1.2020 0:03

dobry vecer, chcel by som vas poprosit o pomoc, zapysujem a zmazavam riadky v textovom subore. no pri pouziti tohoto kodu pre zmazanie riadku zacne applikacia zapisovat vymazavane riadky zaprvy riadok a celi subor sa miesa, namiesto toho aby bol novy riadok pod poslednim riadkom je v jednom riadku s prvim riadkom, a uz mam z toho zmatok. Prosim kde robym chibu?

Try
            Using sr As New StreamReader(filename)
                While Not sr.EndOfStream
                    load = load + sr.ReadLine() + ControlChars.NewLine
                End While
            End Using

            load = load.Remove(load.LastIndexOf(ControlChars.NewLine))
            If (load.Contains(ControlChars.NewLine)) Then
                load = load.Remove(load.LastIndexOf(ControlChars.NewLine))
            End If


            Using sw As New StreamWriter(filename)
                sw.WriteLine(load)
            End Using

            load = ""

        Catch ex As Exception
            MessageBox.Show("You can't make changes, you haven't selected valid file.", "Warning:", MessageBoxButton.OK, MessageBoxImage.Information)
        End Try

za kazdu odpoved dakujem

Odpovědět

27.1.2020 0:03

Matúš Olejník

Člen

Matúš Olejník:27.1.2020 8:06

Sorry za spam, nikdy som neriešil gramatiku, ale takéto "perly" som ešte nevidel Keď budeš v práci náhodou odpisovať zákazníkovi dávaj si trocha záležať (napíš si to najprv napr. v MS Worde)

Nahoru Odpovědět

27.1.2020 8:06

/* I am not sure why this works but it fixes the problem */

Miroslav Jurek

Člen

Miroslav Jurek:28.1.2020 11:35

Kod ti robi presne to co tam mas napisane. Ak chces odstranit posledny riadok z textoveho suboru pouzi skor toto.

Sub removeLastLineFromFile(filename As String)
    Dim text() As String = IO.File.ReadAllLines(filename)
    If (text.Length) > 0 Then Array.Resize(Of String)(text, text.Length - 1)
    IO.File.WriteAllLines(filename, text)
End Sub

Akceptované řešení
+20 Zkušeností
+2,50 Kč

Nahoru Odpovědět

28.1.2020 11:35

3012

Člen

3012:28.1.2020 11:42

ahoj, už som to včera vyriešil, ale dakujem za odpoveď, a nechcem sa hadat ale predtim dochadzalo k tomu prehadzovaniu zmazavanero riadku, ale teraz už to neroby. este raz ti dakujem.

Nahoru Odpovědět

28.1.2020 11:42

Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 4 zpráv z 4.