用VB编写一个函数，输入一串字符，然后将其颠倒显示,如何编写？

用VB编写一个函数，输入一串字符，然后将其颠倒显示,如何编写？

Private Sub Command1_Click()
Dim a As String
a = InputBox("请输入一串字符", "输入")
For i = Len(a) To 1 Step -1
Print Mid(a, i, 1);
Next
End Sub

用StrReverse函数可以使字符反向！
str=StrReverse(string1)

是啊 我才想起来 StrReverse(string1) 受教了

请问：如何用left和right函数的嵌套使用来实现本题呢？
谢谢啦。

Function StrRe(ByVal StrText As String) As String
StrRe = StrReverse(StrText)
End Function
Sub main()
Dim strre As String
Console.WriteLine("请输入字符串:")
strre = Console.ReadLine()
strre = StrReverse(strre)
Console.WriteLine("逆序后的字符串：")
Console.WriteLine(strre)
Console.ReadLine()
End Sub

同意StrReverse
StrReverse函数
描述
返回一个字符串，其中一个指定子字符串的字符顺序是反向的。
语法
StrReverse(string1)
参数string1是一个字符串，它的字符顺序要被反向。如果string1是一个长度为零的字符串("")，则返回一个长度为零的字符串。如果string1为Null，则产生一个错误。