Local variables are available only in the procedure where they are declared
Private Sub cmdOkay_Click()
Dim strAnimal As String
strAnimal = "Dog"
Call ChangeAnimal
Debug.Print strAnimal 'Still Dog
End Sub
Private Sub ChangeAnimal()
strAnimal = "Cat"
End Sub