Still working on the legacy application and seeing this

Module Module1
  Public x as long
  
  Sub mymethod1(Byref x as long)
    x = x + 1
  End Sub

  Sub mymethod2()
    mymethod1(x)
  end sub
End Module```
Way cool.