Skrive et program, der giver brugerne mulighed for at angive to tal , og derefter bruge dem i dit program til at returnere et resultat kan nemt gøres i Visual Basic. De fleste computer programmer kræver en bruger at indtaste information og en af de bedste måder at gøre dette på er gennem en brugergrænseflade . Du kan tilføje kontrolelementer til en UI til at indfange information fra brugeren , såsom tekstbokse og knapper. Når du kører programmet kan brugeren angive et antal i hver tekstboks , og klik på en knap for at få et resultat . Ting du skal
Microsoft Visual Studio
Vis Flere Instruktioner
1
Launch Microsoft Visual Studio , klik på " Nyt projekt " placeret på venstre rude af din computerskærm , og udvide " Visual Basic " under " Installerede skabeloner ". Klik på " Windows" og dobbeltklik på "Windows Forms Application " for at oprette et nyt projekt med en UI.
2
Dobbeltklik på " TextBox " til fra " Toolbox" ruden for at tilføje en ny tekstboks til formularen . Tilføj et andet tekstfelt . Dobbeltklik på " Button " til fra " Toolbox" ruden for at tilføje en ny knap kontrol til formularen . Dobbeltklik på " Button1 " for at oprette et klik begivenhed for knap
3
Kopier og indsæt følgende kode til at oprette fire nye variabler, du vil bruge i dit program : .
Dim firstNum som IntegerDim secondNum som IntegerDim resultat som IntegerDim inputError som Boolean
4
Føj følgende kode til at kontrollere , at de indtastede oplysninger i tekstboksen er numerisk og hvis det ikke er så returnere en fejl : Hej
Hvis ( IsNumeric ( Me.TextBox1.Text ) ) ThenfirstNum = Me.TextBox1.TextElseMessageBox.Show ( "Indtast et tal i rubrik 1") inputError = TrueEnd Hvis
5
Kopier og indsæt følgende kode til at kontrollere for tidligere fejl og fortsætte fange nummer i rubrik nummer to : Hej p Hvis inputError = False ThenIf ( IsNumeric ( Me.TextBox2.Text ) ) ThensecondNum = Me . TextBox2.TextElseMessageBox.Show ( "Indtast et tal i rubrik 2") inputError = TrueEnd IfEnd Hvis
6
Føj følgende kode til at tilføje både tal og returnere resultatet ved hjælp af en besked boks : Hej
Hvis inputError = False Thenresult = firstNum + secondNumMessageBox.Show ( "Tilføjelsen af disse to tal er:" & result.ToString ) End If
7
Press " F5 " for at køre programmet og skrive et tal i hver af de tekstbokse. Klik på " Button1 " for at få resultatet .