Imports System
Public Class Program
Public Shared Sub Main(ByVal args As String())
Dim n as Integer = 97
Dim s As String = Char.ConvertFromUtf32(n)
Console.WriteLine(s)
Dim ch As Char = Char.ConvertFromUtf32(n)
Console.WriteLine(s)
End Sub
End Class
' run:
'
' a
' a
'