Ett grundläggande krav för alla programmeringsspråk är möjligheten att lägga till två värden , antingen numeriskt värde eller värden sträng . Microsofts Visual Basic tillhandahåller båda dessa funktioner för programmeraren . För numeriska värden kan du välja valfritt antal datatyper , inklusive heltal, decimaltal och andra , mer vetenskapligt , typ . Oavsett värden du behöver lägga till , bör Visual Basic kunna hantera verksamheten helt enkelt. Instruktioner
Initial Setup
1
Starta Visual Basic-program . Öppna din befintliga projekt eller klicka på " Nytt projekt ".
2
Rulla markören över menyn Verktyg till vänster och dubbelklicka på två textrutor , en knapp och en etikett . Detta lägger dessa kontroller i formuläret i design fönstret .
3
Dra kontrollerna runt på blanketten tills de är rätt inriktade på ett sätt som ser organiserat och vettigt . De två textrutor håller indata , etiketten kommer att få resultatet av din kod , och knappen kommer faktiskt köra koden .
4
Dubbelklicka på knappen i formuläret . Den Coding fönster öppnas och Visual Basic Editor kommer placera markören mellan en Sub-procedur rubrik och en End Sub linje . Din kod kommer att gå mellan dessa linjer . När du faktiskt köra ditt program , detta är den kod som ska köras när du klickar på knappen .
Lägga Numeriska värden
5
vill lägga till nummer , lägg till följande kod mellan Sub Procedure linjen och End Sub linjen att lägga två siffror :
Dim Num1 , Num2 , TotalNum As Integer
p Om Textbox1.Text > Inget Sen
p Om Textbox2.Text > Inget Sen
Prova
Num1.Focus ( ) katalog
Num1 = Integer.Parse ( Textbox1.Text ) katalog
Num2.Focus ( ) katalog
Num2 = Integer.Parse ( Textbox2.Text ) katalog
TotalNum = Num1 + Num2
Label1.Text = TotalNum.ToString ( ) katalog
catch
MessageBox.Show ( " Ett giltigt krävs " ) katalog
End Försök
Else
MessageBox.Show ( " Ett antal krävs det andra fältet " ) katalog
Return
Else
MessageBox.Show (" A nummer krävs i det första fältet " ) katalog
Return
End If
Dim deklarerar tre variabler av typen Heltal , och den efterföljande koden tvingar användaren att ange numeriska värden eller ett felmeddelande genereras . Genom att klicka på knappen gör att koden för att utföra och tolka strängar till nummer för matematiska operationer med Visual Basic . Siffrorna läggs ihop och placeras i TotalNum fältet , vilket VB sedan omvandlar till en sträng värde och platser i Label1.Text fältet .
6
Klicka på den gröna pilen för att felsöka ditt projekt . Formuläret ska öppna för att testa din kod .
7
Utför ett positivt test , som ibland kallas gå ned " happy vägen . " Skriva ett nummer i det första fältet och ett nummer i det andra fältet . Klicka på knappen . Du bör se resultatet visas i fältet Etikett .
8
Utför ett negativt test med tecken keying alfabetiska i ena eller båda fälten och klicka på knappen . Du bör se ett felmeddelande för varje område där du knappat icke - numeriska tecken .
Lägga ( Concatenating ) teckensträngar
9
Infoga följande kod mellan sub förfarande header och End Sub bakre raden :
p Om Textbox1.Text > Inget Sen
p Om Textbox2.Text > Inget Sen
Label1.Text = Textbox1.Text & Textbox2.Text
Else
MessageBox.Show ( " En sträng krävs i det andra fältet " ) katalog
Return
Else
MessageBox.Show ( " en sträng krävs i det första fältet " ) katalog
Return
End If
Denna kod kontrollerar att ett värde anges i varje fält och sedan fogar samman två strängar, placera den resulterande strängen i Label1.Text fältet .
10
Klicka på den gröna pilen för att felsöka ditt projekt . Formuläret ska öppna för att testa din kod .
11
Utför ett positivt test med knappa en sträng i det första fältet och en sträng i det andra fältet . Klicka på knappen och koden ska please de två strängarna ihop och sätta resultatet i Label1.Text fältet .
12
Utför ett negativt test genom att knappa ingenting i ena eller båda fälten och klicka på knappen . Du bör se ett felmeddelande för varje område där du inte nyckeln någonting
