Gjennomsnitts er et utmerket eksempel på den type oppgave datamaskiner er flinke til å automatisere : konseptuelt enkel, men kjedelig og repeterende å finne tusenvis av ganger for deg selv . Denne enkle Visual Basic programmet tar en serie med tall , atskilt med komma , og beregner gjennomsnittet av disse. Husk å bruke en sunn fornuft test til resultatene , men, ingen program korrigerer for en dataregistrering feil . Instruksjoner
en

Åpne Visual Basic og opprett et nytt prosjekt ved å klikke på "File" og "New Project ". Velg " Windows Forms Project. "
2

Dra en " knapp " fra " verktøykasse" inn i prosjektet.
3

Dra en " lærebok " fra den " verktøykasse" inn i prosjektet.
4

Dobbeltklikk på knappen for å opprette en hendelse metode for knappen .
5

Legg til følgende kode på knappen arrangement metode : en

Dim s = TextBox1.Text.Split ( " ,")

Dim total = 0

For hver x In s

Dim n = Double.Parse ( x )

total + = n

Neste

Dim gjennomsnittlig = totalt /s.Length

MsgBox ( " gjennomsnittet er "+ average.ToString )

Dette tar teksten i tekstboksen og deler den rundt komma. Den konverterer deretter hvert nummer fra en streng til en dobbel og finner summen . Når du er ferdig , skrives det ut gjennomsnittet for brukeren i en meldingsboks.
6

Klikk på "Play "-knappen .
7

Type et sett med tall , skilt med komma inn i tekstboksen. Klikk på knappen for å gjennomsnitt dem .