Visual Basic programmeringssprog kan udføre flere nyttige funktioner. Selvom sproget ikke er umiddelbart intuitivt, kan regelmæssig praksis overvinde eventuelle indledende usikkerheder. Bestemmelse et rektangel areal og omkreds er en måde at forstå de måder dette sprogs grundlæggende elementer interagerer , når du opretter en brugbar program. Denne rutine inviterer brugere til at oprette tekstbokse og etiketter , erklære variabler og skrive kode til at udføre matematiske funktioner . Instruktioner
1
Access værktøjskassen fanen . Opret fire tekstbokse og fire etiketter på Visual Basic design formular. Luk værktøjskassen fane. Arranger dem i to kolonner med etiketter på venstre og tekstbokse til højre. Adgang til hver etikettens tekst egenskaber. Skift de generiske navne til beskrivende udtryk såsom længde , højde, areal og omkreds . Brug enkle etiketter undgår senere forvirring.
2
Adgang værktøjskassen fanen igen. Tilføj en knap til Visual Basic design formular. Gå knappens tekst egenskaber. Ændre knappens navn fra den generiske mulighed ( f.eks Button1 ) til et beskrivende udtryk som beregne.
3
Adgang kodning vinduet. Tilføj kommandolinjer mellem knappen erklæringen og afsluttende END SUB notation. Brug " Dim " kommando til at erklære fire forskellige variabler. Selvom variabelnavne kan være alt , bruge de samme etiketnavne bestemt i trin 1 . Brug " som" -kommandoer til at erklære hver variabel at være enten et heltal eller Decimal (f.eks Dim længde som Decimal ) .
4
Tilføj kommandolinier at sidestille længde og højde variabler oplysninger findes i passende tekstbokse (f.eks længde = Textbox1.Text ) .
5.
Tilføj en kommandolinje for hver matematisk funktion . Erklære området variablen at være den beregnede produktet af længde og bredde ( fx areal = længde * bredde) . Erklær omkredsen variabel til at være den beregnede sum af rektanglets fire sider [f.eks , perimeter = (( 2 * bredde) + ( 2 * længde) ) ] .
6
Tilføj en kommandolinje til output området variablens beregnet værdi i sin passende tekstboks (fx TextBox3.Text = område) . Tilføj en endelig linje kode til at overføre perimeter variabels beregnede værdi til dets passende tekstboks (fx TextBox4.Text = perimeter ) .
7
Gem programmet. Kør programmet i debugging mode at kontrollere at den fungerer korrekt . Dette åbner et nyt vindue . Vælg værdier for længde og højde og input disse i de rigtige bokse. Klik på knappen for at beregne værdierne for areal og omkreds .