Mediante la funcion Mid$() puedes sacar cada letra de una cadena de texto. Un ejemplo:

Option Explicit

Private Sub Form_Load()
Const Text As String = "Hola mundo!"
Dim Char() As String, i As...