Hallo Leute ![:(](https://www.vb-paradise.de/wcf/images/smilies/sad.png)
mir wird immer und immer wieder dieser Fehler ausgespuckt![:/](https://www.vb-paradise.de/wcf/images/smilies/unsure.png)
Der verweis auf einen nicht freigegebenen Member erfordert einen Objekthinweis
Hier mein Code
Hoffe ihr könnt mir da helfen![:(](https://www.vb-paradise.de/wcf/images/smilies/sad.png)
das ganze passiert in Zeile 28....
![:(](https://www.vb-paradise.de/wcf/images/smilies/sad.png)
mir wird immer und immer wieder dieser Fehler ausgespuckt
![:/](https://www.vb-paradise.de/wcf/images/smilies/unsure.png)
Der verweis auf einen nicht freigegebenen Member erfordert einen Objekthinweis
Hier mein Code
VB.NET-Quellcode
- Imports System.IO
- Imports System.Text.RegularExpressions
- Public Class frm_main
- 'Hier wird das Textfile vom Addon geöffnet
- Private Sub cmd_read_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmd_read.Click
- Dim ofd As New OpenFileDialog
- ofd.InitialDirectory = "C:\"
- ofd.Filter = "Alle Dateien (*.*)|*.*"
- ofd.Title = "Wählen Sie eine Datei zum Öffnen aus"
- If ofd.ShowDialog() = Windows.Forms.DialogResult.OK Then
- MsgBox("Es wird geöffnet: " & ofd.FileName)
- Else
- MsgBox("Abbruch")
- Me.Close()
- Return
- End If
- Dim charrace() As String
- Dim Zaehler As Integer = 0
- Dim fs As New FileStream("charackter.txt", FileMode.Create)
- Dim sw As New StreamWriter(fs)
- Dim myFile As String
- Dim myMatch As String = System.Text.RegularExpressions.Regex.Match("\[Race\]\s=\s\""]a-zA-Z0-9]""").ToString
- charrace = System.IO.File.ReadAllLines(myFile)
- While Zaehler <= charrace.Length - 1
- If myMatch <> "" Then
- txtbx_race.Text = String.Copy("""")
- MsgBox("Gefunden!")
- sw.Close()
- Return
- End If
- Zaehler += 1
- End While
- End Sub
- Private Sub cmd_close_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmd_close.Click
- Me.Close()
- End Sub
- End Class
Hoffe ihr könnt mir da helfen
![:(](https://www.vb-paradise.de/wcf/images/smilies/sad.png)
das ganze passiert in Zeile 28....