See Selgitatud õpetab, kuidas luua lihtsat Visual Basicu programmi, mis võimaldab leida kahe arvu summa. Programmi käitamiseks vajate Visual Basicu kompilaatorit, näiteks Visual Studio 2017.
1
Avage eelistatud Visual Basicu redaktor. Kui soovite oma programmi hiljem testida, veenduge, et teil oleks programm, mis toetab silumist (nt Visual Basic 2017). Kui teil pole Visual Basicu redaktorit, võite kasutada rakendust Notepad ++ või alla laadida ametliku Visual Basicu 2017 programm.
2
Lisage esialgne rida. Tippige Visual Basicu redaktorisse Private Class Form1, seejärel vajutage sisestusklahvi ↵. See seadistab ülejäänud dokumendi. Visual Basicu märgend “Private Class” on sarnane HTML-i märgendiga ““.
3
Seadistage oma dokument muutujate tuvastamiseks. Kuna summa leidmiseks liidate üksteisele kaks täisarvu, peate Visual Basicut küsima, et see tuvastaks numbrid muutujatena. Selleks: Tippige Private Sub Button1_Click (sender As Object, e As EventArgs) ja vajutage ↵ Enter. Tippige käsku Handle (Button1_Click) ja vajutage ↵ Enter. Tippige Dim sum As Integer ja vajutage sisestusklahvi ↵ Enter. Tippige Dim a As Integer ja vajutage ↵ Enter. Tippige Dim b As Integer ja vajutage sisestusklahvi ↵ Enter.
4
Looge tekstiväljade jaoks erand. Kui te kasti ei täida, annab see teie programmile vea. Selleks: Tippige Label4.Visible = True ja vajutage ↵ Enter. Tippige kui TextBox1.Text = “” Seejärel vajutage sisestusklahvi. Tippige sisse Label4.Visible = False ja vajutage sisestusklahvi.Tüüp. kaustas MessageBox.Show(“Vabandust, kast ei saa olla tühi.”) ja vajutage sisestusklahvi ↵ Enter. Tippige väljale TextBox1.Focus() ja vajutage ↵ Enter. Tippige väljale End If ja vajutage ↵ Enter.
5
Looge oma numbrite jaoks tekstikastid. See on liides, mida kasutate numbrite sisestamiseks. Selleks: Tippige a = Val(Tekstkast1.Tekst) ja vajutage ↵ Enter. Tippige b = Val(Tekstikast2.Tekst) ja vajutage sisestusklahvi ↵ Enter. Tippige summa = (a + b) ja vajutage ↵ †µ Enter.Type in Label4.Text = “” & a & ” ja ” & b & ” summa on ” & summa & “.” ja vajutage ↵ Enter.
6
Lõpetage nupuvajutusega sektsioon. Tippige välja End Sub ja vajutage sisestusklahvi ↵.
7
Looge uus jaotis. Tippige käsk Private Sub Form1_Load(sender As Object, e as EventArgs) Handles MyBase.Load ja vajutage sisestusklahvi ↵.
8
Lisage vale sildi silt. Sisestage Label4.Visible = False ja vajutage sisestusklahvi, seejärel tippige väljale End Sub ja vajutage sisestusklahvi.
9
Looge viimane jaotis. Sisestage Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click ja vajutage ↵ Enter.
10
Lisage tekstikastidesse viited. See võimaldab teil lõpetatud programmi numbreid lisada. Selleks: Tippige väljale TextBox1.Text = “” ja vajutage sisestusklahvi ↵ Enter. Tippige väljale TextBox2.Text = “” ja vajutage ↵ Enter. Tippige Label4.Text = “” ja vajutage ↵ Enter.Type jaotises TextBox1.Focus() ja vajutage sisestusklahvi ↵.
11
Looge käsk “lisamine”. Sisestage Sum = Val(Tekstikast1.Tekst) + Val(Tekstikast2.Tekst) ja vajutage sisestusklahvi.
12
Lisage käsk “summa”. Tippige väljale TextBox3.Text = Sum ja vajutage ↵ Enter.
13
Sulgege kood. Sisestage End Sub ja vajutage viimase jaotise sulgemiseks sisestusklahvi, seejärel tippige kogu programmi sulgemiseks käsk End Class.
14
Silu oma programmi. Klõpsake vahekaarti Silumine, klõpsake nuppu Alusta silumist ja oodake, kuni silumisprotsess lõpeb. Kui teie programm on täielikult silutud, peaks avanema kolme tekstikasti ja lisamisnupuga aken; seejärel saate lisada kahele ülemisele kastile numbri ja klõpsata nuppu, et numbrid kokku liita. Kui kasutate Visual Basicu koodi loomiseks tavalist tekstiredaktorit, pole teil vahekaarti Silumine. Kaaluge oma projekti avamist Visual Studio 2017-s, et siluda ja programmi käivitada. Kui kasutate koodi loomiseks Notepadi või TextEditi, salvestage lõplik fail vormingus “.vb”, mitte “.txt” või “. tekst”.