La función Mid devuelve un número específico de caracteres de una cadena de entrada determinada.
Sintaxis
Mid(String,start[,Length])
Descripción de parámetros
String- Un parámetro obligatorio. Cadena de entrada desde la que se devolverá el número especificado de caracteres.
Start- Un parámetro obligatorio. Un entero, que especifica la posición inicial de la cadena.
Length- Un parámetro opcional. Un entero, que especifica el número de caracteres que se devolverán.
Agregue un botón y agregue la siguiente función.
Private Sub Constant_demo_Click()
Dim var as Variant
var = "Microsoft VBScript"
msgbox("Line 1 : " & Mid(var,2))
msgbox("Line 2 : " & Mid(var,2,5))
msgbox("Line 3 : " & Mid(var,5,7))
End Sub
Cuando ejecuta la función anterior, produce la siguiente salida.
Line 1 : icrosoft VBScript
Line 2 : icros
Line 3 : osoft V