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 .