Gennemsnit er et glimrende eksempel på den slags opgave computere er gode til at automatisere : begrebsmæssigt enkel, men kedelig og repetitive at regne tusindvis af gange for dig selv. Denne enkle Visual Basic program tager en række tal , adskilt af kommaer , og beregner deres gennemsnit. Husk at anvende et fælles fornuft test til resultaterne , men; noget program korrigerer for en indtastning af data fejl. Instruktioner
1
Open Visual Basic , og opret et nyt projekt ved at klikke på "File " og " Nyt projekt ". Vælg "Windows Forms projekt".
2
Træk en " button" fra " værktøjskasse" ind i dit projekt .
3
Træk et " tekstfelt " fra den "værktøjskasse" ind i dit projekt .
4
Dobbeltklik på knappen for at oprette en begivenhed metode til knappen.
5.
Føj følgende kode til knappens hændelse metode : Hej
Dim s = TextBox1.Text.Split ( ",")
Dim total = 0
For Each x In s
Dim n = Double.Parse (x )
total + = n
Næste
Dim gennemsnit = total /s.Length
MsgBox ( " gennemsnittet er "+ average.ToString )
Dette tager teksten i tekstfeltet , og deler det omkring kommaer. Det derefter konverterer hvert nummer fra en streng til en dobbelt og finder summen . Når du er færdig , den udskriver den gennemsnitlige til brugeren i en besked boks .
6
Klik på " Play" knappen .
7
Skriv et sæt tal , adskilt af kommaer . i tekstfeltet Klik på knappen for at gennemsnittet dem.