Variable String

[Cvilla90]

Sería así:

Dim cadena As String = "Cessna 172 Skyliner"
Dim cadMostrar As String
cadMostrar = cadena.Substring(7, 3)
MsgBox(cadMostrar)


Donde 7 es la posición de la cadena y 3 es la cantidad a extraer a partir de la posición