Процедуры с параметрами - VB

Формулировка задачи:

Добрый день уважаемые!
Проведите пожалуйста ликбез(( Вот простейшая процедура с параметрами. Она передает переменным VB,NB,Vtek значения , но как только переходит в процедуру Moduli_rascheta, эти переменные становятся =0((( Есть возможность их объявить в процедуре Raschet_na_deni так, чтобы они были видны и в др.?

Private Sub Raschet_Click()
   Raschet_na_deni VelVB, VelNB, 0
End Sub
Private Sub Raschet_na_deni(VB As Single, NB As Single, Vtek As Single)
         Moduli_rascheta
End Sub

Решение задачи: «Процедуры с параметрами»

textual
                            Листинг программы 
                        
                            Napor = Format(dll2.MyfuncVB(VB) - dll2.MyfuncNB(NB), "0.00")