Still working on the legacy application and seeing this

```vbnet 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.