Visual Basic para Aplicaciones - Error de compilación

Hola, estoy escribiendo una aplicación en VBA usando el IDE de Visual Basic del AutoCAD 2009, y en uno de los procedimientos el compilador me avisa del siguiente error:

Error de compilación: Calificador no válido

referido al parámetro cadena de tipo String. El código del procedimiento es el siguiente

Private Sub extraeInfo(color As String, seccion As String, cadena As String)

Dim i As Integer

i = 0

Do While cadena.Chars(i) <> Chr(32) And cadena.Chars(32) <> vbTab

i = i + 1

Loop

color = Left(cadena, i)

Do While cadena.Chars(i) = Chr(32) Or cadena.Chars(i) = vbTab

i = i + 1

Loop

seccion = Mid(cadena, i, Len(cadena) - i - 1)

End Sub

En concreto el error se produce en la primera utilización del parámetro cadena, justo en la linea del primer Do. ¿en qué estoy fallando?. Gracias por adelantado