Hallo leute,
ich habe ein Programm geschrieben, welches selbstständig lernen sollte. aber das auslesen des gelernten will irgendwie nicht so recht.
ich habe kein plan, was ich da falsch gemacht habe.
vieleicht könnt ihr mir da ja helfen.
der fehlerhafte abschnitt zum lesen der informationen ist dieser hier:
warum der das nicht macht, ist mir auch nicht so ganz klar...
grüße Knifehunter aka. EsTari
ich habe ein Programm geschrieben, welches selbstständig lernen sollte. aber das auslesen des gelernten will irgendwie nicht so recht.
ich habe kein plan, was ich da falsch gemacht habe.
vieleicht könnt ihr mir da ja helfen.
der fehlerhafte abschnitt zum lesen der informationen ist dieser hier:
VB.NET-Quellcode
- For Each file In IO.Directory.GetFiles("C:\Dokumente und Einstellungen\eraidni\Desktop\KI") 'für jede vorhandene datei:
- If TextBox2.Text & ".txt" = file Then 'wenn die benutzernachricht mit einer datei übereinstimmt, werden aus der datei antwortmöglichkeiten ausgelesen.
- For Each line In IO.File.ReadAllLines("C:\Dokumente und Einstellungen\eraidni\Desktop\KI\" & TextBox2.Text & ".txt") 'auslesen der antwortmöglichkeiten
- think(i) = line
- i += 1
- Next
- i = 0 'zurücksetzten des zählers
- lastline = think(r.Next(0, think.Length)) 'Auswählen der antwort und schreiben der antwort
- TextBox1.AppendText("[Bot]: " & lastline & vbNewLine)
- End If
- Next
warum der das nicht macht, ist mir auch nicht so ganz klar...
grüße Knifehunter aka. EsTari