Visual Basic é uma linguagem de programação que iniciantes e programadores experientes podem apreciar. Ambiente integrado de programação da Microsoft é robusto , ea versão gratuita Express é totalmente capaz de entregar aplicações de nível profissional. Uma das características de qualquer linguagem de programação é a manipulação das cordas, e VB.NET não é excepção, com a função de "Mid " ser uma das funções mais fáceis de string para usar. Cordas

Uma string é um grupo contíguo de caracteres que podem ser compostos por caracteres alfabéticos , numéricos e especiais. O VB.NET não consideram caracteres numéricos em uma string como números, mas como personagens alfanuméricos. Se você quiser converter caracteres alfanuméricos para números, a função Mid pode ajudar , desde que você sabe onde eles estão, ou pode encontrá-los .
Mid Função

a sintaxe da função Mid é " NewString = Mid ( oldString , S, L) ", onde "S" é o ponto de partida na seqüência , em relação a um, e "L" é o número de caracteres que você deseja extrair de " oldString . " O resultado é colocada na variável " NewString " . O parâmetro "L" é opcional , e se você não especificá-lo, VB.NET obtém todos os caracteres a partir da posição "S" para o fim da " oldString ".
usando mid

Se você sabe a posição exata do grupo de caracteres que você está procurando, a função mid é fácil de usar . Por exemplo, se você tem uma seqüência de endereços de 30 caracteres em um record.and dados sabem que os primeiros cinco caracteres conter o número da casa , suas declarações VB.NET ficaria assim :

Dim housenumber as String

housenumber = Mid ( AddressString , 1, 5)

Isso colocaria os primeiros cinco personagens de " AddressString " in " Numero da porta . " Se você sabe que nos últimos cinco personagens são o código postal , você pode usar estas declarações para extraí-lo :

Dim ZipCodeString como corda

ZipCodeString = Mid ( AddressString , 26)

Você não precisa da opção de comprimento , desde meados terá início às 26 personagem e vá para o fim da cadeia .
Extraindo um número com Mid

Extraindo um número é um pouco mais complexa , já que você tem que saber exatamente onde o número está localizado na string. Para esta operação você realmente precisa usar a função " IsNumeric " e loop através da cadeia de origem . Se você sabe que tem um número em algum lugar em uma string, e você quer convertê-lo para um inteiro, você tem que procurar a string de origem , teste cada personagem para o valor numérico e armazenar os números de outra string. O código seria algo parecido com isto:

Dim SourceString como String = " abcde123defgh "

Dim NumberString , TestString como corda

Dim TestString como corda

Dim NumberInteger como Integer

Dim counter1 como Integer = 1

Dim Comprimento 1 como Integer = Len ( SourceString )

Do While Comprimento 1 > counter1

TestString = Mid ( SourceString , counter1 , 1)

Se IsNumeric ( TestString ) Então

NumberString = NumberString & TestString

Endif

counter1 + = 1

loop

NumberInteger = Integer.Parse ( NumberString )

o loop examina cada caráter de " SourceString ", e se for um número , o código concatena -lo para " NumberString . " Quando o ciclo chega ao fim de " SourceString " termina looping , ea próxima instrução converte " NumberString " para um inteiro eo coloca no " NumberInteger . "