- #1
L
lexxrec
Neues Mitglied
Themenersteller
- Dabei seit
- 25.05.2006
- Beiträge
- 2
- Reaktionspunkte
- 0
Hallo Gemeinde,
ich benötige noch eine Schleife für meinen Stundenplan. Wir haben diesen mit Textfeldern gebaut und speichern und lesen diesen aus der Registry aus. Jedoch haben wir es nicht hinbekommen, das Speichern und Einlesen mit einer Schleife zu programmieren.
Wir haben also für jeden Tag der Woche von der 1. bis zur 10. Stunde das Folgende in unserem Code stehen:
txtMontag(0).Text = GetSetting(Stundenplan, Optionen, txtMontag(0).Text, )
txtMontag(1).Text = GetSetting(Stundenplan, Optionen, txtMontag(1).Text, )
txtMontag(2).Text = GetSetting(Stundenplan, Optionen, txtMontag(2).Text, )
txtMontag(3).Text = GetSetting(Stundenplan, Optionen, txtMontag(3).Text, )
txtMontag(4).Text = GetSetting(Stundenplan, Optionen, txtMontag(4).Text, )
txtMontag(5).Text = GetSetting(Stundenplan, Optionen, txtMontag(5).Text, )
SaveSetting Stundenplan, Optionen, txtMontag(0).Text, txtMontag(0).Text
SaveSetting Stundenplan, Optionen, txtMontag(1).Text, txtMontag(1).Text
SaveSetting Stundenplan, Optionen, txtMontag(2).Text, txtMontag(2).Text
SaveSetting Stundenplan, Optionen, txtMontag(3).Text, txtMontag(3).Text
SaveSetting Stundenplan, Optionen, txtMontag(4).Text, txtMontag(4).Text
Da das jedoch kein schönes programmieren ist sind wir weiterhin auf der Suche nach der perfekten Lösung mithilfe einer Schleife. Wir haben For x to Schleifen, Kopf und Fußgesteuerte Schleifen ausprobiert. Jedoch ohne Erfolg.
Hoffe ihr könnt uns helfen. Danke schoneinmal im Vorraus.
ich benötige noch eine Schleife für meinen Stundenplan. Wir haben diesen mit Textfeldern gebaut und speichern und lesen diesen aus der Registry aus. Jedoch haben wir es nicht hinbekommen, das Speichern und Einlesen mit einer Schleife zu programmieren.
Wir haben also für jeden Tag der Woche von der 1. bis zur 10. Stunde das Folgende in unserem Code stehen:
txtMontag(0).Text = GetSetting(Stundenplan, Optionen, txtMontag(0).Text, )
txtMontag(1).Text = GetSetting(Stundenplan, Optionen, txtMontag(1).Text, )
txtMontag(2).Text = GetSetting(Stundenplan, Optionen, txtMontag(2).Text, )
txtMontag(3).Text = GetSetting(Stundenplan, Optionen, txtMontag(3).Text, )
txtMontag(4).Text = GetSetting(Stundenplan, Optionen, txtMontag(4).Text, )
txtMontag(5).Text = GetSetting(Stundenplan, Optionen, txtMontag(5).Text, )
SaveSetting Stundenplan, Optionen, txtMontag(0).Text, txtMontag(0).Text
SaveSetting Stundenplan, Optionen, txtMontag(1).Text, txtMontag(1).Text
SaveSetting Stundenplan, Optionen, txtMontag(2).Text, txtMontag(2).Text
SaveSetting Stundenplan, Optionen, txtMontag(3).Text, txtMontag(3).Text
SaveSetting Stundenplan, Optionen, txtMontag(4).Text, txtMontag(4).Text
Da das jedoch kein schönes programmieren ist sind wir weiterhin auf der Suche nach der perfekten Lösung mithilfe einer Schleife. Wir haben For x to Schleifen, Kopf und Fußgesteuerte Schleifen ausprobiert. Jedoch ohne Erfolg.
Hoffe ihr könnt uns helfen. Danke schoneinmal im Vorraus.