Leere Textdatei erstellen

  • VB.NET

Es gibt 5 Antworten in diesem Thema. Der letzte Beitrag () ist von Patschi.

    Leere Textdatei erstellen

    Kurze Frage:

    Wie kann ich in meinem Eigene Dateien eine LEERE Textdatei erstellen lassen?
    Wenn die nicht existiert, dann erstellen.
    Meine neue Homepage: pkern.at
    Wetter bei mir zu Haus:

    Wenn die Datei bereits vorhanden ist, wird sie überschrieben.

    VB.NET-Quellcode

    1. Imports System.IO
    3. Public Class Form1
    5. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    7. File.WriteAllText("C:\Neue Textdatei.txt", "")
    9. End Sub
    10. End Class

    VB.NET-Quellcode

    1. Imports System.IO
    3. Public Class Form1
    5. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    7. Dim locPath As String = Nothing
    8. Dim locContent As String = Nothing
    9. Dim locArray() As String = Nothing
    10. Dim locLetter As String = Nothing
    12. locPath = "C:\Neue Textdatei.txt"
    13. locContent = File.ReadAllText(locPath)
    14. locArray = locContent.Split(CChar(vbCrLf))
    16. locLetter = "A"
    18. File.Delete(locPath)
    20. For x As Integer = 0 To UBound(locArray)
    22. If (locArray(x).StartsWith(locLetter) = False) Then
    24. File.WriteAllText(locPath, locArray(x) & vbCrLf)
    26. End If
    28. Next
    30. End Sub
    31. End Class

    Mein VB sagt: Der Wert darf nicht NULL sein.

    :S

    Edit:

    VB.NET-Quellcode

    1. If (locArray(x).StartsWith(locLetter) = False) Then
    Meine neue Homepage: pkern.at
    Wetter bei mir zu Haus:

Facebook
Telefonspende