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 . "