Visual Basic är ett programmeringsspråk som både början och erfarna programmerare kan uppskatta . Microsofts integrerade programmeringsmiljö är robust , och den fria Express versionen är fullt kapabel att leverera professionell nivå applikationer . En av funktionerna i alla programmeringsspråk är sträng hantering , och VB.NET är inget undantag , med " Mid " funktion är en av de enklaste strängen funktioner att använda . Strings
En sträng är en sammanhängande grupp av tecken som kan bestå av bokstäver, siffror och specialtecken . VB.NET ser inte numeriska tecken i en sträng som siffror , men som alfanumeriska tecken . Om du vill konvertera alfanumeriska tecken till tal , kan funktionen Mid hjälpa , så länge du vet var de är , eller kan hitta dem . Addera Mid Funktion
syntaxen för funktionen Mid är " NewString = Mid ( OldString , S , L ) , " där " S " är utgångspunkten i strängen , relativt , och " L " är det antal tecken som du vill extrahera från " OldString . " Resultatet är placerad i " NewString " variabel. Den " L " parametern är valfri , och om du inte anger det , blir VB.NET alla tecken från positionen " S " i slutet av " OldString . "
använda Mid
p Om du vet den exakta positionen för den grupp av tecken som du letar efter , är det mitten av funktionen lätt att använda . Till exempel , om du har en 30 - tecken adress sträng i en datamängd record.and vet att de första fem tecknen innehåller husnummer , skulle dina VB.NET uttalanden se ut så här :
Dim Husnummer som String
Husnummer = Mid ( AddressString , 1 , 5 ) katalog
Detta skulle placera de första fem tecknen " AddressString " i " Husnummer . " Om du känner till de sista fem tecken är postnumret , kan du använda dessa uttalanden för att extrahera den :
Dim ZipCodeString som String
ZipCodeString = Mid ( AddressString , 26 ) katalog
Du behöver inte längden alternativet , sedan mitten startar vid tecken 26 och gå till slutet av strängen . Addera Extrahera ett tal med Mid
Extrahera ett antal är lite mer komplicerat , eftersom man måste veta exakt var antalet ligger i strängen . För denna operation du faktiskt skulle behöva använda " IsNumeric " funktion och slinga genom källsträngen . Om du vet att du har ett antal någonstans i ett snöre , och du vill konvertera det till ett heltal , måste du söka källsträngen , testa varje tecken för numeriskt värde och lagra numren i en annan sträng . Koden skulle se ut ungefär så här :
Dim SourceString som String = " abcde123defgh "
Dim NumberString , TestString som String
Dim TestString som String
Dim NumberInteger As Integer
Dim Counter1 As Integer = 1
Dim längd1 As Integer = Len ( SourceString ) katalog
Do While längd1 > Counter1
TestString = Mid ( SourceString , Counter1 , 1 ) katalog p Om IsNumeric ( TestString ) Sen
NumberString = NumberString & TestString
Endif
Counter1 + = 1
loop
NumberInteger = Integer.Parse ( NumberString ) katalog
loopen undersöker varje karaktär " SourceString , " och om det är ett antal , de sammanfogar koden det till " NumberString . " När öglan kommer till slutet av " SourceString " den slutar looping , och nästa uttalande omvandlar " NumberString " till ett heltal och placerar den i " NumberInteger . " Addera
