Skapa ett enkelt program som kan lokalisera staden för en given postnummer kräver först bygga en databas över alla ZIP-koder i USA och deras motsvarande städer , och sedan bygga program som kan läsa denna databas . Den US Postal Service säljer en uttömmande databas med denna information som en del av dess adress informationstjänst . Men om att hitta den största staden i samband med ett postnummer är allt du behöver göra , ger US Census en enkel Kommaavgränsade värden ( CSV ) databas för free.Our programmet kommer att byggas i Microsoft Visual Basic . NET eftersom dess TextFieldParser klass gör det enkelt att läsa CSV-filer till ett program , den har en fri version tillgänglig för användare och det illustrerar begreppen skriva en locator postnummer utan att köra fast i minutia av att räcka grafiskt användargränssnitt ( GUI ) och CSV tolkningskoden . Instruktioner
1
Ladda ner listan postnummer från första resursen . Du kan spara den på din dator genom att klicka på " File " och " Spara som " från din webbläsare .
2
Skapa ett nytt projekt i Visual Basic . NET genom att klicka på " File " och " Nytt projekt . " Namnge den " Zip Code Locator . " Addera 3
Dra en etikett från verktygslådan till ditt projekt . Detta kommer att hålla staden och staten i samband med ett postnummer senare .
4
Dra ett textfält från verktygslådan till ditt projekt . Det är där slutanvändaren kommer att skriva in ett postnummer .
5
Dra en knapp från verktygslådan till ditt projekt . Detta kommer att vara det som användaren klickar på för att leta upp ett postnummer .
6
Dubbelklicka på knappen för att skapa en klick - händelse kod . Det kommer automatiskt att ta dig till källkod redaktör . Klistra in följande :
dim i = My.Computer.FileSystem.OpenTextFieldParser ( " c : \\ zips.txt " ) katalog
in.setDelimiters ( " , " ) katalog
dim rader som ArrayList = New ArrayList ( ) katalog
samtidigt ( ej in.endofdata ) katalog
rows.add ( in.ReadFields ) katalog
änden medan
för varje rad As String ( ) I rader
p Om ( v ( 1 ) . Lika ( TextBox1.Text ) ) Sen
Label1.Text = v ( 3 ) + " , " + rad ( 2 ) katalog
Return
End If
Nästa
MessageBox.Show ( " Kan inte hitta postnummer " ) katalog
En mycket viktig del av programmet är att " avkastningen " i Om /Då klausul . Detta talar om för programmet att sluta titta igenom postnummer databasen så fort den hittar ett resultat och förhindrar " Kan inte hitta zipcode " meddelande från att visas i förtid .
7
Tryck F5 för att köra programmet . Ange ett postnummer i textfältet och tryck på knappen . Namnet på staden och staten i samband med postnumret kommer att visas i programmet .
