Het schrijven van een programma dat gebruikers in staat stelt om twee nummers te geven en ze vervolgens te gebruiken in je programma om een resultaat terug kan gemakkelijk worden bereikt in Visual Basic . De meeste computerprogramma's vereisen een gebruiker gegevens invoeren en een van de beste manieren om dit te doen is door middel van een gebruikersinterface . U kunt besturingselementen toevoegen aan een UI om informatie van de gebruiker , zoals tekstvakken en knoppen vast te leggen . Wanneer u het programma de gebruiker kan een aantal in elk tekstvak opgeven en klik op een knop om een resultaat te krijgen . Wat je nodig hebt Microsoft Visual Studio Toon Meer Aanwijzingen 1 Lancering Microsoft Visual Studio , klikt u op " New Project" gelegen aan de linkerkant van uw computerscherm , en uit te breiden " Visual Basic " onder " Installed sjablonen . " Klik op "Windows" en dubbelklik op " Windows Forms Application " om een nieuw project te maken met een UI . Dubbelklik op " TextBox " 2 om van de " Toolbox " deelvenster naar een nieuwe tekstvak toe te voegen aan uw formulier . Voeg een tweede tekstvak . Dubbelklik op " knop" om van de " Toolbox " deelvenster naar een nieuwe knop controle toe te voegen aan uw formulier . Dubbelklik op de " Button1 " een click event maken voor de knop Kopieer 3 en plak de onderstaande code om vier nieuwe variabelen die je gaat gebruiken in je programma te maken : . Dim firstNum Zoals IntegerDim secondNum als IntegerDim gevolg Zoals IntegerDim inputError zoals Van Boole 4 Voeg de volgende code om te controleren of de informatie in het tekstvak wordt ingevoerd is numeriek en als het niet dan terug een fout : Als ( IsNumeric ( Me.TextBox1.Text ) ) ThenfirstNum = Me.TextBox1.TextElseMessageBox.Show ( " Voer een getal in box 1 " ) inputError = TrueEnd Als 5 Kopieer en plak de volgende code om te controleren op eerdere fouten en blijven vangen het nummer in vak nummer twee getreden : Als inputError = False thenif ( IsNumeric ( Me.TextBox2.Text ) ) ThensecondNum = Me . TextBox2.TextElseMessageBox.Show ( " Voer een getal in vak 2 " ) inputError = TrueEnd IfEnd Als 6 Voeg de volgende code om zowel van de nummers toe te voegen en terug te keren het resultaat met behulp van een message box : Als inputError = False Thenresult = firstNum + secondNumMessageBox.Show ( " De toevoeging van deze twee getallen is : " & result.ToString ) End If Press 7 " F5 " om het programma uit te voeren en typ een getal in elk van de tekstvakken . Klik op " Button1 " om het resultaat te krijgen .
|