program ini sebenarnya sudah pernah saya bahas di contoh program c++
http://allaboutalgoritma.blogspot.com/2010/05/program-c-membuat-kata-string-terbalik.htmlContohnya kata yang saya inputkan
kita
maka outpunya menjadi
atik
Codingnya
Module Module1
Dim ch As String
Dim i As Integer
Sub Main()
Console.Write("Masukan sebuah kata: ")
ch = Console.ReadLine
Console.WriteLine("Kata Setelah di Balik : ")
i = ch.Length - 1
While (i >= 0)
Console.Write(ch(i))
i = i - 1
End While
Console.WriteLine()
Console.ReadLine()
End Sub
End Module