主题：自己封装了一个进制转换函数，不知道哪里写错了，一直运行不了

一直报编译错误

Dim array As String= "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"

Public Function getString(ByVal number As Long ,ByVal n As Integer) As StringBuilder

If number > n Then

    Return getString(number / n, n).Append(array.Chars(number Mod n))

Else

    Return new StringBuilder(array.Chars(number))

End If

End Function

‘试调用时间毫秒值转62进制

Output.Show(getString((Date.now - #1/1/1970#).TotalMilliseconds ,62).ToString)

还是报编译错误：语句不能出现在方法体内。假定为方法末尾

错误代码：Public Function getString(ByVal value As Decimal) As String