Vb sub procedure

hi, I have got some problem with the vb sub procedure

Below is the program
Private Sub btnDisplay_Click(...) Handles btnDisplay.Click
Dim a As String = "abc"
cut(a)
textbox1.Text =a
End Sub
Sub cut(ByRef a As String)
a= a.Substring(2)
End Sub

for this the return is c

but for another program
Private Sub btnDisplay_Click(...) Handles btnDisplay.Click
Dim a As String = "abc"
cut((a))
textbox1.Text =a
End Sub
Sub cut(ByRef a As String)
a= a.Substring(2)
End Sub

The return is abc

Can any one explain it? Thanks

Both could be replaced by a single line of code. Those procedures look like they were built using the "smack it until it works" approach.

Instead of passing things to a function you're using byref to operate on the variable in the sub. I don't know what platform you're on so a VBA equivalent would be:



When you add the parenthesis () you're forcing it to pass by value instead of by reference. Write a function instead of this nonsense.

Thanks for your help;