Visual Basic es un lenguaje de programación que tanto el principio y programadores experimentados pueden apreciar. Entorno de programación integrado de Microsoft es robusto , y la versión gratuita Express es totalmente capaz de ofrecer aplicaciones de nivel profesional . Una de las características de cualquier lenguaje de programación es el manejo de cadenas y VB.NET no es una excepción , con la función de " Mid" es una de las funciones de cadena más fáciles de usar . Cuerdas

Una cadena es un grupo contiguo de caracteres que puede estar compuesto de caracteres alfabéticos , numéricos y especiales . VB.NET no considera caracteres numéricos en una cadena como números, sino como caracteres alfanuméricos. Si desea convertir caracteres alfanuméricos a los números , la función Mid puede ayudar , siempre y cuando usted sabe dónde están, o puede encontrarlos.
Medio Función

la sintaxis de la función Mid es " NewString = Mid ( obsoleto por nuevo , S , L ) ", donde " S " es el punto de partida de la cadena , en relación a una, y " L " es el número de caracteres que desea extraer de " obsoleto por nuevo ". El resultado se coloca en la variable " NewString " . El parámetro " L" es opcional , y si no lo especifica , VB.NET obtiene todos los caracteres desde la posición " S " al final de " obsoleto por nuevo ".
usando medio

Si conoce la posición exacta del grupo de caracteres que está buscando, la función Mid es fácil de usar . Por ejemplo , si tiene una cadena de dirección de 30 caracteres en una record.and datos de saber que los cinco primeros caracteres contienen el número de la casa , sus estados de VB.NET se vería así :

HouseNumber dévil como secuencia

HouseNumber = Mid ( AddressString , 1 , 5 )

Esto colocaría a los cinco primeros caracteres de " AddressString " en " HouseNumber . " Si conoces a los últimos cinco caracteres son el código postal , usted puede utilizar estas instrucciones para extraerlo :

ZipCodeString dévil como secuencia

ZipCodeString = Mid ( AddressString , 26 )
< p > no se necesita la opción longitud, desde mediados comenzarán a las 26 caracteres e ir al final de la cadena .
Extraer un número con medio

extracción un número es un poco más complejo , ya que hay que saber exactamente dónde se encuentra el número de la cadena. Para esta operación, que en realidad tendría que utilizar la función " IsNumeric " y recorrer la cadena de origen . Si usted sabe que tiene un número en una cadena en alguna parte, y quiere convertirlo en un entero, usted tiene que buscar la cadena de origen , compruebe cada carácter por el valor numérico y almacenarlos en otra cadena. El código sería algo como esto :

SourceString dévil como secuencia = " abcde123defgh "

numberString Dim , TestString as String

TestString dévil como secuencia

NumberInteger Dim como Integer

COUNTER1 Dim como Integer = 1

length1 Dim como Integer = Len ( SourceString )

Do While length1 > COUNTER1

TestString = Mid ( SourceString , COUNTER1 , 1) spanish

Si IsNumeric ( TestString ) Entonces

numberString = numberString y TestString

Endif

COUNTER1 + = 1

Loop

NumberInteger = Integer.Parse ( numberString )

El bucle examina cada personaje de " sourceString ", y si se trata de un número, el código concatena a " numberString . " Cuando el circuito llega a la final de " SourceString " termina bucle , y el siguiente comando convierte " numberString " a un entero y lo coloca en " NumberInteger . "