zumindest solltest du den Code einrücken, damit man besser sieht, wie
die einzelnen Verschachtelungsebenen sind:
1 | Aufsteigen:
|
2 |
|
3 | Do
|
4 |
|
5 | While Taster_auf = 0 'Taster abfrage
|
6 | Motor_start = 1
|
7 | If Stop_auf = 0 Then 'Endschalter abfrage
|
8 | Motor_start = 0
|
9 | return
|
10 | End If
|
11 | Wend
|
12 |
|
13 | Motor_start = 0
|
14 |
|
15 | If Stop_auf = 0 Then 'Endschalter abfrage
|
16 | Motor_start = 0
|
17 | return
|
18 | End If
|
19 | If Stop_auf = 1 Then Exit Do
|
20 | Loop
|
21 |
|
22 | Return
|
den letzten Teil deiner Funktion solltest du dir noch einmal genauer
ansehen. Und auch die do - Loop ist ein wenig sinnlos, wenn sowieso auf
jeden Fall aus der Loop ausgestiegen wird.
M
was spricht gegen
1 | Aufsteigen:
|
2 |
|
3 | if Stop_auf = 0 then ' Wenn das Rollo schon oben ist
|
4 | return ' kann der Benutzer drücken soviel er will
|
5 | endif ' wir kümmern uns nicht darum
|
6 |
|
7 | if Taster_auf = 0 then ' will der Benutzer nach oben?
|
8 | Motor_start = 1 ' dann erfüllen wir ihm den Wunsch
|
9 | else
|
10 | Motor_start = 0 ' Nein? dann eben nicht
|
11 | endif
|
12 |
|
13 | return
|
Die Funktion ist so ausgelegt, (wie deine auch) dass sie von einer
anderen Stelle regelmässig aufgerufen werden muss.
