Visual Basic giver mulighed for edb-programmører til at udvikle software-applikationer , der spænder fra spil til anvendelser, der indebærer database integration og internettet. Visual Basic programmer, der involverer en brugergrænseflade vil anvende forskellige aspekter af programmeringssprog til at vise advarsler , give anvisninger om den bruger eller udføre beregninger . Visual Basic er tilgængelig i den fulde developer miljø Microsoft Visual Studio.NET eller begrænset version kaldet Microsoft Visual Basic Express , som er et gratis download fra Microsoft. Instruktioner
1

Åbn din developer miljø. Klik på " Project" ved siden af ​​ordet "Opret" i øverste venstre del af skærmen Start . Et nyt vindue åbnes for dig at vælge den type projekt for at skabe .
2

Klik på "Windows Form Application ". Skriv navnet på dit nye projekt i "Name " feltet ned nedenfor, som vil være " spilleautomaten. " Klik på " OK", når du er færdig, for at vende tilbage til en tom formular , som at begynde at arbejde .
3

Klik på " View " fra den øverste menu valg og vælg " Tool Box . " Værktøjskassen indeholder de mest anvendte objekter, der udgør forskellige programmer . Rul ned , vælg " Button ", og træk det med musen knappen nede , til den tomme formularen til højre , hvilket placerer den i øverste venstre hjørne . Slip museknappen .
4

Klik og træk et mere " Button ", placere det under den første knap . Klik og træk tre " Label " kasser til højre for knapperne linet op i en vandret række . Dette er, hvor dine tal vil vise senere.
5.

Ændre teksten i hver af knapperne på " Spin " og " End" ved at ændre " Tekst" feltet i "Egenskaber " fanen placeret på den højre side af skærmen. Klik på en knap én gang, navigere til " Egenskaber" fanen , skal du finde "Tekst "-feltet og slette standardteksten . Indtast den nye tekst og klik på "Enter ", når du er færdig .
6

Ændre teksten i hver af de "mærke" bokse til "0" ved at klikke på hver " Label" box én gang, navigere til " Egenskaber" fanen "Tekst " feltet lokalisere og indtaste "0". Hit "Enter ", når du er færdig .
7

Dobbeltklik på "End" -knappen for at tage dig til koden skærmen. Type " Close ( )" ( uden anførselstegn ) mellem "Private Sub " og " End Sub " anmærkninger.
8

Dobbeltklik på " Spin " knappen og skriv følgende mellem "Private Sub " og " End Sub " notationer :

Label1.text = CStr (Int ( Rnd * 10) )

Tryk på " Enter" for at springe til den næste linje . Indtast to linjer som dette , kun ændre " Label1.text " til " Label2.text " og " Label3.text " for i alt tre linjer.
9

Skriv følgende direkte under de tre linjer, du lige har oprettet :
p Hvis ( Label1.text = "7" ) og " ( Label2.text = " 7 " ) og" ( Label3.text = "7 ") og derefter Beep ()

Hit "Enter ", når du er færdig .
10

Klik på "File" i den øverste menu valg og vælg "Gem alle filer. " Klik på den lille , grønne pil -ikonet i øverste ikon valg til at køre dit program. Dit program vil blive vist i vinduet af sig selv. Klik på " Spin " og se tilfældige tal befolker kasserne. Hold klikke på " Spin ", og hvis du får tre 7'ere i træk, at computeren bipper på dig.