hallo, ich habe vollenden code:
und es kommt ein Fehler bei: l.add(o)
Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.
kann mir da jemand helfen???
mfg filmee24
VB.NET-Quellcode
- Public Sub EditLine(ByVal Str As String, ByVal Value As String, Optional ByVal Langname As String = "True")
- If IO.File.Exists(Pfad) Then
- If Langname = "True" Then
- Dim l As List(Of String)
- Dim ls = My.Computer.FileSystem.ReadAllText(Pfad).ToList()
- For Each o As String In ls
- If Not Regex.Match(o, "(?<str>.*?)=").Groups("str").Value = Str Then
- l.Add(o)
- ElseIf Regex.Match(o, "(?<str>.*?)=").Groups("str").Value = Str Then
- l.Add(Regex.Match(o, "(?<str>.*?)=").Groups("str").Value & Value)
- End If
- Next o
- 'My.Computer.FileSystem.WriteAllText(Pfad, Str & "=" & Value, True)
- IO.File.WriteAllLines(Pfad, l)
- RaiseEvent OnWriting(New LngEventargs(Str, Value))
- End If
- End If
- End Sub
und es kommt ein Fehler bei: l.add(o)
Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.
kann mir da jemand helfen???
mfg filmee24