Chr

Public Function Chr(ByVal CharCode As Long) As String

Convert the ANSI charcode (0-255) to a string

Public Function GetAlphabet() As String
   Dim lCount As Long
   Dim lResult As String
   
   For lCount = Asc("A") To Asc("Z")
       lResult = lResult & Chr(lCount)
   Next
   
   Return lResult ' A-Z
End Function

See also: