Twee getallen optellen in Visual Basic

Deze How.com.vn leert je hoe je een eenvoudig programma maakt in Visual Basic, waarmee je de som uitrekent van twee getallen. Om je programma te draaien heb je een Visual Basic compiler nodig, zoals Visual Studio 2017.

Stappen

Pdf downloaden

1
Open de Visual Basic-editor van je voorkeur. Wil je het programma later testen, zorg dan dat je software hebt die debuggen ondersteunt (bijv. Visual Basic 2017).
- Heb je geen Visual Basic-editor, dan kun je eventueel Notepad++ gebruiken of Visual Basic 2017 downloaden.
2
Voeg er de eerste regel aan toe. Typ Private Class Form1 in de Visual Basic-editor en druk op ↵ Enter. Hiermee stel je de rest van je document in.
- De 'Private Class'-tag in Visual Basic is gelijk aan de '<html>'-tag in HTML.
3
Stel je document zo in dat het variabelen herkent. Omdat je twee integers bij elkaar gaat optellen, zal je Visual Basic moeten instrueren om getallen als variabelen te herkennen. Dit doe je als volgt:
- Typ Private Sub Button1_Click(sender As Object, e As EventArgs) en druk op ↵ Enter.
- Typ Handle(Button1_Click) en druk op ↵ Enter.
- Typ Dim sum As Integer en druk op ↵ Enter.
- Typ Dim a As Integer en druk op ↵ Enter.
- Typ Dim b As Integer en druk op ↵ Enter.
4
Maak een uitzondering voor de tekstvakken. Hiermee geef je programma de opdracht om een foutmelding te geven als je het vak niet invult. Dit doe je als volgt:
- Typ Label4.Visible = True en druk op ↵ Enter.
- Typ If TextBox1.Text = "" Then en druk op ↵ Enter.
- Typ Label4.Visible = False en druk op ↵ Enter.
- Typ MessageBox.Show("Sorry, veld mag niet leeg zijn.") en druk op ↵ Enter.
- Typ TextBox1.Focus() en druk op ↵ Enter.
- Typ End If en druk op ↵ Enter.
5
Maak tekstvakken voor je getallen. Dit wordt de interface die je gaat gebruiken voor het invoeren van de getallen. Dit doe je als volgt:
- Typ a = Val(TextBox1.Text) en druk op ↵ Enter.
- Typ b = Val(TextBox2.Text) en druk op ↵ Enter.
- Typ sum = (a + b) en druk op ↵ Enter.
- Typ Label4.Text = "De som van" & a & " en " & b & " is " & sum & "." en druk op ↵ Enter.
Typ End Sub en druk op ↵ Enter.
Typ Private Sub Form1_Load(sender As Object, e as EventArgs) Handles MyBase.Load en druk op ↵ Enter.
Typ Label4.Visible = False en druk op ↵ Enter, en typ daarna End Sub en druk op ↵ Enter.
Typ Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click en druk op ↵ Enter.
10
Voeg verwijzingen toe aan je de tekstvakken. Hierdoor kun je getallen invoeren in je uiteindelijke programma. Dit doe je als volgt:
- Typ TextBox1.Text = "" en druk op ↵ Enter.
- Typ TextBox2.Text = "" en druk op ↵ Enter.
- Typ Label4.Text = "" en druk op ↵ Enter.
- Typ TextBox1.Focus() en druk op ↵ Enter.
Typ Sum = Val(TextBox1.Text) + Val(TextBox2.Text) en druk op ↵ Enter.
Typ TextBox3.Text = Sum en druk op ↵ Enter.
Typ End Sub en druk op ↵ Enter om het laatste onderdeel af te sluiten, en typ daarna End Class om het hele programma af te sluiten.
14
Debug je programma. Klik op de Debug-tab, klik op Start Debugging en wacht tot het debug-proces is afgerond. Is je programma helemaal gecontroleerd op fouten, dan verschijnt er als het goed is een venster met drie tekstvakken en een optel-knop; je kunt vervolgens een getal invoeren door in elk van de bovenste vakken op de knop te drukken, om de ingevoerde getallen bij elkaar op te tellen.
- Als je een eenvoudige teksteditor gebruikt voor het maken van je Visual Basic-code, dan heb je geen Debug-tab. Gebruik eventueel Visual Studio 2017 om je programma te debuggen en te draaien.
- Als je Kladblok of TextEdit gebruikt voor het programmeren, zorg er dan voor dat je het uiteindelijke bestand opslaat in '.vb'-indeling, in plaats van '.txt' of '.text'.
Advertentie

Tips

Visual Studio 2017 kun je gratis download van de website van Microsoft.
Wanneer je applicaties als Notepad of TextEdit gebruikt, is het verstandig om handmatig bepaalde delen van je code in te laten springen, zodat je de verschillende onderdelen van je programma beter van elkaar kunt onderscheiden.

Advertentie