Skriva ett program som tillåter användare att ange två siffror och sedan använda dem i ditt program för att returnera ett resultat lätt kan åstadkommas i Visual Basic . De flesta datorprogram kräver en användare att mata in information och en av de bästa sätten att göra detta är genom ett användargränssnitt . Du kan lägga till kontroller i ett UI för att samla in information från användaren , t.ex. textrutor och knappar . När du kör programmet kan användaren ange en siffra i varje textruta och klicka på en knapp för att få ett resultat . Saker du behöver
Microsoft Visual Studio
Visa fler instruktioner
1
Launch Microsoft Visual Studio , klicka på " Nytt projekt " ligger på den vänstra rutan på din datorskärm , och expandera " Visual Basic " nedan " Installerade mallar . " Klicka på " Windows " och dubbelklicka på " Windows Forms Application " för att skapa ett nytt projekt med en UI .
2
Dubbelklicka på " TextBox " att från " Toolbox " rutan för att lägga till en ny kontroll textruta i formuläret . Lägg en andra textrutan . Dubbelklicka på " knappen " till från " Toolbox " rutan för att lägga till en ny knapp kontroll i formuläret . Dubbelklicka på " Button1 " för att skapa en click-händelse för knappen
3
Kopiera och klistra in följande kod för att skapa fyra nya variabler du kommer att använda i ditt program : .
Dim firstNum som IntegerDim secondNum som IntegerDim resultat som IntegerDim inputError As Boolean
4
Lägg till följande kod för att kontrollera att de uppgifter som anges i textrutan är numeriskt och om det inte sedan returnera ett fel :
Om ( IsNumeric ( Me.TextBox1.Text ) ) ThenfirstNum = Me.TextBox1.TextElseMessageBox.Show ( " Ange ett tal i ruta 1 " ) inputError = TrueEnd Om
5
Kopiera och klistra in följande kod för att kontrollera om tidigare misstag och fortsätta fånga numret i fält nummer två :
p Om inputError = False ThenIf ( IsNumeric ( Me.TextBox2.Text ) ) ThensecondNum = Me . TextBox2.TextElseMessageBox.Show ( " Ange ett nummer i fält 2 " ) inputError = TrueEnd IfEnd Om
6
Lägg till följande kod för att lägga till både siffror och returnera resultatet med en meddelanderuta :
Om inputError = False Thenresult = firstNum + secondNumMessageBox.Show ( " Tillägget av dessa två tal är : " & result.ToString ) End If
7
Press " F5 " för att köra programmet och skriva ett nummer i varje textrutor . Klicka " Button1 " för att få resultatet .
