Warum funktioniert folgender Code nicht ?
Code: Alles auswählen
line2 = 387
...
linedist1 =21
For i =line2 To 690 Step linedist1
...
Next i
Pb3.94
Code: Alles auswählen
line2 = 387
...
linedist1 =21
For i =line2 To 690 Step linedist1
...
Next i
Code: Alles auswählen
for n = 1 to 100 step Z
z + 1
next n
Code: Alles auswählen
max=5000
stp=2
While i<=max
Debug i
i+stp
stp*3
Wend
Code: Alles auswählen
; For var = START To ENDE Step DIST
var = START
Repeat
;...
var + DIST
Until var > ENDE
Code: Alles auswählen
; For var = START To ENDE Step DIST
var = START
While var <= ENDE
;...
var + DIST
Wend
Code: Alles auswählen
stp=2
For i=0 To 1000
Debug "i="+Str(i)+" stp="+Str(stp)
i-1+stp
stp*2
Next
Code: Alles auswählen
max=100
stp=5
For i=0 To max/stp
Debug i*stp
Next
Debug ""
stp=10
For i=0 To max/stp
Debug i*stp
Next
Code: Alles auswählen
Macro For_(Var, Start, Ende, Steps)
Var = Start - Steps
While Var + Steps < Ende
Var + Steps
EndMacro
Macro Next_()
Wend
EndMacro
For_(a, 1, 100, b)
Debug a
b + 1
Next_()