Visual Basic è un linguaggio di programmazione che sia all'inizio e programmatori esperti possono apprezzare . Ambiente di programmazione integrato di Microsoft è robusta , e la versione gratuita Express è pienamente in grado di fornire applicazioni di livello professionale . Una delle caratteristiche di qualsiasi linguaggio di programmazione è la gestione delle stringhe , e VB.NET non fa eccezione , con la funzione " Mid " essere una delle funzioni di stringa più facile da usare . Strings

Una stringa è un gruppo contiguo di caratteri che può essere costituito da caratteri alfabetici , numerici e speciali . VB.NET non considera i caratteri numerici in una stringa di numeri , ma come caratteri alfanumerici . Se si desidera convertire i caratteri alfanumerici per i numeri , la funzione Mid può aiutare , a patto che si sa dove sono, o riesce a trovarli.
Funzione Mid

la sintassi della funzione Mid è " NewString = Mid ( OldString , S , L) , " dove " S " è il punto di partenza nella stringa , relativa a uno, e "L" è il numero di caratteri che si desidera estrarre da " OldString ". Il risultato viene posto nella variabile " NewString " . Il parametro "L" è opzionale , e se non si specifica che , VB.NET ottiene tutti i caratteri dalla posizione " S " alla fine di " OldString . "
Sulla base di MID

Se si conosce l' esatta posizione del gruppo di caratteri che stai cercando , la funzione Mid è facile da usare. Per esempio, se si dispone di un indirizzo di stringa di 30 caratteri in un record.and dati sapere che i primi cinque caratteri contengono il numero di casa , le sue dichiarazioni VB.NET sarebbe simile a questa :

Dim numero civico come String < br

housenumber > = Mid ( AddressString , 1 , 5 ) per

Questo porrebbe i primi cinque caratteri di " AddressString " in " numero civico ". Se conoscete gli ultimi cinque caratteri sono il CAP, è possibile utilizzare queste istruzioni per estrarlo :

Dim ZipCodeString come String

ZipCodeString = Mid ( AddressString , 26 ) per < p > non è necessario l'opzione di lunghezza , da metà inizieranno a carattere 26 e andare alla fine della stringa .
estrazione di un numero con Mid

Estrazione un numero è un po 'più complesso , poiché è necessario sapere esattamente dove il numero si trova nella stringa . Per questa operazione è effettivamente necessario utilizzare la funzione " IsNumeric " e scorrere la stringa di origine . Se sai di avere un numero da qualche parte in una stringa , e si desidera convertire in un numero intero , si deve cercare la stringa di origine , verificare ogni carattere per il valore numerico e memorizzare i numeri in un'altra stringa . Il codice dovrebbe essere simile a questa :

Dim SourceString as String = " abcde123defgh "

Dim NumberString , testString as String

Dim TestString as String

dim NumberInteger as Integer

dim Counter1 as Integer = 1

dim Lunghezza1 As Integer = Len ( SourceString ) per

Do While Lunghezza1 > Counter1

TestString = Mid ( SourceString , Counter1 , 1 ) per

Se IsNumeric ( TestString ) Poi

NumberString = NumberString & TestString

Endif

Counter1 + = 1

loop

NumberInteger = Integer.Parse ( NumberString ) per

Il ciclo esamina ogni personaggio di " sourceString ", e se è un numero, il codice concatena a " NumberString ". Quando il ciclo arriva alla fine di " SourceString " termina looping , e l'istruzione successiva converte " NumberString " in un intero e lo mette in " NumberInteger . "