نمونه کد های کوچک و کاربردی VB.Net

[ravegoat]

اين تابع يك رشته ي ورودي را به عنوان آرگومان دريافت مي كند. سپس حروف رشته را از آخر به اول به ترتيب در يك متغير قرار مي دهد. در نهايت تابع مقدار مقلوب شده را بر مي گرداند.

 Function Reserver(ByVal UrText As String) As String
        For i As Integer = UrText.Length - 1 To 0 Step -1
            Reserver += UrText.Chars(i)
        Next
End Function

مثال:

MsgBox(Reserver("PC Network"))