Visual Basic 6 er en programmeringsmiljø udgivet af Microsoft Corporation. Dens formål er at give ikke-programmører med et miljø, hvor de kan hurtigt og med relativ lethed , opbygge simple Windows-programmer , uden at skulle skændes med kompleksiteten af nogle af de mere kraftfulde sprog, såsom C + + og Java. Et simpelt program som en designet til at beregne moms for en kasserer er præcis den slags problem Visual Basic er bedst egnet til . Instruktioner
1
Opret et projekt, og navngive den " TaxCalculator " eller en anden passende navn. Efterlad alle andre muligheder , som de er , og fortsætte gennem skærmen, indtil du bliver præsenteret med formularen editor.
2
Tilføj en etiket og ændre sin tekst ejendom til " subtotal ". Etiketter kan tilføjes ved hjælp af mærkningen post på komponenter på listen i venstre side af skærmen og trække det ind i formularen editor, i den position , hvor du ønsker at etiketten skal placeret i din ansøgning. Det er tekst ejendom kan ændres ved at venstreklikke på etiketten en enkelt gang og finde den "Text" post i ejendommen listen nederst til højre side af skærmen.
3 < p > Tilføj en tekstboks ved siden af den subtotal etiket ved at trække tekstboksen post fra komponenter listen. Denne gang , i stedet for teksten ejendom, ændre dens navn ejendom til " subtotalBox ".
4
Tilføj et mærkat under den første og ændre sin tekst ejendom til "Skat ".
< Br > 5
Tilføj en tekstboks ved siden af den skattemæssige etiketten og ændre sit navn ejendom til " taxBox . "
6
Tilføj endnu et mærke og ændre sin tekst ejendom til "Total ". < br >
7
Tilføj en tekstboks ved siden af denne mærkning og ændre sit navn ejendom til " totalWithTaxBox . "
Vi har gennemført brugergrænsefladen.
8 < p > Dobbeltklik på " subtotal " tekstfeltet. Dette gør to ting : Det skaber en begivenhed, der opstår, hver gang teksten i denne tekstboks ændres, og flytter dig til et andet vindue - kildekoden editor
Put denne kode i så fald: . < Br >
REM Definerer en omsætningsafgift på 8,25% Const TAXRATE = 1,0825
REM Erklær en del af hukommelsen til at holde subtotalDim subtotal som dobbelt
REM Hvis brugeren sætter i dollaren underskrive fjerne it.Dim subtotalString = Erstat ( subtotalBox.Text , "$ ", "" )
REM Konverter subtotal fra brugeren fra en tegnstreng i et numbersubtotal = CDbl ( Val ( subtotalString ) )
REM figur ud og skat med total.taxBox.Text = ( subtotal * ( TAXRATE - 1) ) totalWithTaxBox.Text = ( subtotal * TAXRATE )
REM linjer angiver kommentarer eller bemærkninger , som jeg har lagt i at forklare koden . Disse ignoreres af compileren .