Hallo!
Ich hoffe, der Titel trifft es einigermaßen.
Ich bin immer noch mit meiner "Fachfüllung" beschäftigt, d. h. ich habe eine Regalabbildung, dessen eingetragenen Daten ich speichern, laden und löschen möchte.
Im Moment geht es nur um das "befüllen".
So sieht es im Moment aus.
Zu jedem Fach gehören Werte von ca. 30 Textboxen. Natürlich könnte ich jetzt 126 x 30 Daten, TextBoxen, Variablen, etc. einzeln anlegen und eingeben, aber es muß doch einfacher gehen.
Hat wer eine Idee wie man das "dynamisieren" könnte?
Gruß
carsten
Ich hoffe, der Titel trifft es einigermaßen.
Ich bin immer noch mit meiner "Fachfüllung" beschäftigt, d. h. ich habe eine Regalabbildung, dessen eingetragenen Daten ich speichern, laden und löschen möchte.
Im Moment geht es nur um das "befüllen".
VB.NET-Quellcode
- Private Sub btnSchliessen_K1_R1_F1_Click(sender As Object, e As EventArgs) Handles btnSchliessen_K1_R1_F1.Click
- For K = 1 To 3
- For R = 1 To 3
- For F = 1 To 14
- Dim sr As StreamWriter = New StreamWriter("c:\DATA\K" & K & "_R" & R & "_F" & F & "_Daten.txt")
- 'hier werden 126 verschiedene Textdateien (Fächer) erzeugt, die letztendlich ca. 30 Fachdaten (Inhalt Textbox) enthalten sollen
- sr.WriteLine(txtAW.Text)
- sr.WriteLine(txtGE.Text)
- ' hier werden die Daten von txtAW und txtGE in die Dateien geschrieben, allerdings enthalten alle Dateien das gleiche (klar)
- ' es gibt aber 126 Mal txtAW und txtGE, nämlich für jedes Fach mit eigenen Daten
- ' also txtAW_K1_R1_F1, txtGE_K1_R1_F1 / txtAW_K1_R1_F2, txtGE_K1_R1_F2 / etc.
- ' sr.WriteLine(txtAW_K" & K & "_R" & R & "_F" & F".Text) funktioniert leider nicht
- sr.Close()
- Next F
- Next R
- Next K
- Me.Close()
- End Sub
So sieht es im Moment aus.
Zu jedem Fach gehören Werte von ca. 30 Textboxen. Natürlich könnte ich jetzt 126 x 30 Daten, TextBoxen, Variablen, etc. einzeln anlegen und eingeben, aber es muß doch einfacher gehen.
Hat wer eine Idee wie man das "dynamisieren" könnte?
Gruß
carsten
