Re: Programm verschwindet ins Nirvana Kategorie: Programmierung Basic (von Peter Müller - 7.06.2007 22:13) | ||
Als Antwort auf Programm verschwindet ins Nirvana von Peter Müller - 7.06.2007 21:51 | ||
| ||
Nachtrag: Ich habe das Programm wie folgt geändert: For i=0 To 3 'ermitteln, ob alle Züge stehen. Wenn nein, keine weiteren Aktionen If ZugStatus(i)<>0 Then Return ' ein Zug fährt, keine weiteren Aktionen in diesem UP. 'ElseIf ZugNummer(i)<>0 Then ' Zug eingetragen ' AnzahlFolgeBloecke=AnzahlFolgeBloecke+1 'Anzahl der eigetragenen Züge ermitteln End If Next For i=0 To 3 If ZugNummer(i)<>0 Then ' Zug eingetragen AnzahlFolgeBloecke=AnzahlFolgeBloecke+1 'Anzahl der eigetragenen Züge ermitteln End If Next Jetzt läuft es einwandfrei! Frage: Lesen hier eigentlich die Entwickler von Hard- und Software mit? Gru� Peter | ||
Antwort schreiben Antworten: |
Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum