Funciones de cadena de caracteres - VI

Mid( )

Mid tiene dos formas de uso, como función y como instrucción.
' Sintaxis (función)
Mid(Cadena, Inicio [, Longitud])

Mid utilizado como función, extrae de Cadena, comenzando en la posición Inicio, una subcadena. Opcionalmente podemos utilizar el parámetro Longitud, para indicar el tamaño de la subcadena. En caso de no utilizar este último parámetro, la subcadena se obtendrá hasta el final. Ver Código fuente 190.

Dim MiCadena As String
Dim SubCadena As String
MiCadena = "El bosque encantado"
SubCadena = Mid(MiCadena, 6)
Console.WriteLine("Subcadena hasta el final: {0}", SubCadena) ' sque encantado
SubCadena = Mid(MiCadena, 6, 3)
Console.WriteLine("Subcadena de 3 caracteres: {0}", SubCadena) ' squ

Código fuente 190

' Sintaxis (instrucción)
Mid(Cadena, Inicio [, NumCarReemplazar]) = CadenaReemplazo

Mid utilizado como instrucción función, reemplaza en Cadena, comenzando por la posición Inicio, la cadena asignada en CadenaReemplazo. Podemos opcionalmente, indicar cuántos caracteres a reemplazar en NumCarReemplazar. Ver el Código fuente 191.

Dim Cadena As String
Cadena = "El bosque encantado"
Mid(Cadena, 4, 5) = "teclado" ' Cadena contiene 􀃆 "El teclae encantado"

Código fuente 191