Mensajes

Hola a todos, estoy usando en un programa el método string.substring de este modo:
    Dim cad As String
    cad = "315 VIVIENDAS"
    pos = 5
   
    Dim num As String
    num = cad.substr(pos - 4, 3)
    MsgBox "Hay " & num & "viviendas."

pero me da el siguiente error de compilación: Calificador no válido

Mi idea, es la de buscar en un RichTextBox, la palabra "viviendas" y saber cual es el número que aparece antes de esta palabra. Por eso utilizo el método string.substring para buscar una cadena dentro de subcadenas. Pero no me funciona. Así que quería saber si hay otro método de cadenas que pueda utilizar.

Muchas gracias.