Visual Basic - Leer txt

Hola, soy muy novato, y no soy capaz de leer un txt caracter a caracter, para almacenarlo en una matriz. Me podeis ayudar?.

Muchas Gracias.

este ejemplo lee cada caracter del texto y lo almacena c/u en una variable de matriz dinámica

Private Sub Command1_Click()
Dim v() As String, str As String
Dim i As Long
str = "Mauro" 'Cadena de texto
ReDim v(Len(str))
For i = 1 To Len(str)
v(i) = Mid(str, i, 1)
Next
End Sub

Suerte.
Mauro.