Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Spustiť Visual Studio alebo Visual Basic Express ( v závislosti na verzii , ktorú ste nainštalovali . ) Kliknite na tlačidlo " Nový projekt " na " Start Page " . 
 2 
 vyberte " Windows Forms , " a potom kliknite na tlačidlo " Pridať " . Otvorí sa nové formuláre systému Windows v jazyku Visual Basic okna " Design " . 
 3 
 Prejdite cez alebo kliknite na " Nástroje " kartu na ľavej hornej časti okna " Design " . Vyberte a pretiahnite dva " TextBox " ovládacie prvky , " značka " , ovládanie a tlačidlá " " kontrolu do formulára . Prípadne , môžete poklepaním na každý ovládací prvok pridať do formulára . 
 4 
 Presuňte " Textovepole1 " a " TextBox2 " ovládacie prvky do vertikálnej polohy pomocou jazyka Visual Basic zarovnanie mriežky ako sprievodcovia . Umiestnite ovládací prvok " Label1 " priamo pod " textových polí " , opäť pomocou jazyka Visual Basic zarovnanie mriežky o pomoc . Umiestnite ovládací prvok " Button1 " na ľavej dolnej časti formulára . 
 5 
 Kliknite na ovládací prvok " Button1 " a vyberte ho . Prechádzajte " Properties " okno na pravej dolnej časti okna " Design " , kým nenájdete " Text " vlastnosť ovládacieho prvku " Button1 " . Zmena textu na " Pridať " . Tlačidlo na formulári by mal teraz obsahovať text " Pridať " , skôr než " Button1 . " 
 6 
 Double - kliknite na tlačidlo " Pridať " sa otvorí základné okno " CODE " Visual . Kód previesť dáta vstúpil do " TextBox1 " a " TextBox2 " sa vykoná , keď používateľ klikne na tlačidlo " Add" , takže to je miesto , kde budete musieť dať kód . Visual Studio umiestni kurzor medzi dva riadky , ktoré vymedzujú začiatok a koniec čiastkového postupu , ktorý spracováva udalosť click tlačidlá . 
 7 
 Vložte kód podobný nasledujúci kód medzi dva riadky sú popísané v krok 6. 
 
 Dim NumberOne , NumberTwo , ResultNumber ako Integer 
 
 Ak TextBox1.Text > " " Tak 
 
 Ak Textbox2.Text > " " Tak 
 
Skúste klipart
 NumberOne.Focus ( ) 
 
 NumberOne = Integer.Parse ( TextBox1.Text ) 
 
 NumberTwo.Focus ( ) 
 
 NumberTwo = Integer.Parse ( Textbox2.Text ) 
 
 ResultNumber = NumberOne + NumberTwo 
 
 Label1.Text = ResultNumber.ToString ( ) 
 
 Catch 
 
 MessageBox.Show ( " Musíte zadať iba čísla v poli . " ) 
 
 End Try 
 
 Else 
 
 MessageBox.Show ( " Musíte zadať číslo v kolónke dva . " ) 
 
 Späť 
 
 Else 
 
MessageBox.Show ( " Musíte zadať číslo do poľa jedno . " ) klipart
Return klipart
 Koniec ak 
 
 " Dim " vyhlásenie stanovuje tri premenné integer typu , nasledované dvoma " Ak " výroky , ktoré kontrolujú , aby sa uistili , že používateľ zadá niečo do " textových polí . " " Try /Catch /End Try " časť kódu robí skutočné konverzný pokusy o zadaných údajov do " textových polí . " Ak je non - číselné údaje sú v oboch " textové pole " ( ako je stanovené príkazy " Integer.Parse " , jednej z dvoch " MessageBox.Show " príkazy získava kontrolu a zobrazí sa chybové hlásenie . Ak dáta v oboch textových polí " " je číselná , potom sčítanie prebieha . Výsledkom je umiestnená v " Label1.Text " vlastnosť , ktorá sa zobrazí na formulári .