Question on ln in a for/next loop

[Kernelpanic]

The global "ln" was probably passed to a Procedure(Sub). - A local "ln" is only known in this subprogram and has no effect on the program outside.



Why it is -2? 

Does the local variable also come before a "shared variable" in the main program? Test it! 

Code: (Select All)

'Beispiel lokale Variablen - 13. Sept. 2024



$Console:Only

Option _Explicit



Declare Sub Beispiel()

Declare Sub Beispiel2(ln As Integer)



Dim As Integer ln, speed(10)



For ln = 1 To 10

  speed(ln) = ln

  Print speed(ln)



  'Sonst ist ln = 11

  If ln = 10 Then

    Exit For

  End If

Next

Print: Print ln



Locate CsrLin + 1, 2

Call Beispiel



Locate CsrLin + 1, 2

Call Beispiel2(ln)

End



Sub Beispiel

  Dim As Integer i

  Dim As Single ln



  For i = 1 To 10

    ln = i * 1.36

    Print Using "##.##"; ln

    Locate CsrLin, 2

  Next

End Sub



Sub Beispiel2 (ln)



  Dim As Integer ln



  'Das lokale "ln" geht vor dem globalen

  ln = ln - 2

  Print ln

End Sub