Imports System
Imports System.Text
Public Class Program
Public Shared Function ReverseStringWithoutTemporaryVariable(ByVal str As String) As String
Dim sb As New StringBuilder()
For i As Integer = str.Length - 1 To 0 Step -1
sb.Append(str(i))
Next
Return sb.ToString()
End Function
Public Shared Sub Main()
Dim str As String = "vb java c"
str = ReverseStringWithoutTemporaryVariable(str)
Console.Write(str)
End Sub
End Class
' run:
'
' c avaj bv
'