Hej! Mam dwa moduły i zmienne do obliczenia, wyniki mam już podane, próbuję tylko rozgryźć co się skąd wzięło, bardzo proszę o pomoc!
Module1
Dim j
Sub a()
i = 5
j = 5
Debug.Print "k=", k+1-1
End Sub
Sub a1()
i = i +1
j = j + 1
Debug.Print "i=", i
Debug.Print "j=", j
End Sub
____________________
Module2
Public i
Sub b()
j = -5
End Sub
Sub b1()
i = i+1
j = j +1
Debug.Print "i=", i
Debug.Print "j=", j
End Sub
Odpowiedzi:
Immediate
1) a
k=0
2) a1
j = 6
i = 6
3) b1
i=7
j=1
4)a1
i = 8
j = 7
5) b
6) b1
i=9
j =1
7) a1
i = 10
j= 8
8) b1
i = 11
j = 1
Zmienne widoczne we wszystkich modułach: i (module1, 2)
Zmienne o zasięgu całego modułu: j (module1)
ZMienne lokalne: k(module1), j (module2, sub b), (module2, sub b1)
Ilość zmiennych:5