[font='Titillium Web', sans-serif]öncelikle iki adet degisken tanımlayalım a ve b degiskenleri[/FONT]
[font='Titillium Web', sans-serif]Dim[/FONT][font='Titillium Web', sans-serif] a [/FONT][font='Titillium Web', sans-serif]As[/FONT][font='Titillium Web', sans-serif]Double[/FONT]
[font='Titillium Web', sans-serif]Dim[/FONT][font='Titillium Web', sans-serif] b [/FONT][font='Titillium Web', sans-serif]As[/FONT][font='Titillium Web', sans-serif]Double[/FONT]
[font='Titillium Web', sans-serif]daha sonra formumuza iki adet textbox bir adet label bir adette commandbutton koyalım[/FONT]
[font='Titillium Web', sans-serif]şimdi commandbuttonun cilick olayına [/FONT]
[font='Titillium Web', sans-serif]a = textboxt1.[/FONT][font='Titillium Web', sans-serif]Text[/FONT]
[font='Titillium Web', sans-serif]b = textboxt2.[/FONT][font='Titillium Web', sans-serif]Text[/FONT]
[font='Titillium Web', sans-serif]label1.caption = a+b[/FONT]
[font='Titillium Web', sans-serif]yazmamız yeterli oalacaktır.[/FONT]
[font='Titillium Web', sans-serif]eğer metin kutusunun dolu boş olmasınıda kontrol edeceksek o zaman commandbuttonun cilick olayının kodunu aşağıdaki gibi yazmalıyız[/FONT]
[font='Titillium Web', sans-serif]If[/FONT][font='Titillium Web', sans-serif] textboxt1.[/FONT][font='Titillium Web', sans-serif]Text[/FONT][font='Titillium Web', sans-serif]= [/FONT][font='Titillium Web', sans-serif]""[/FONT][font='Titillium Web', sans-serif]Or[/FONT][font='Titillium Web', sans-serif] textbox2.tex = [/FONT][font='Titillium Web', sans-serif]""[/FONT][font='Titillium Web', sans-serif]Then[/FONT]
[font='Titillium Web', sans-serif]MsgBox[/FONT][font='Titillium Web', sans-serif]"Hata lütfen sayıları giriniz."[/FONT]
[font='Titillium Web', sans-serif]Exit[/FONT][font='Titillium Web', sans-serif]Sub[/FONT]
[font='Titillium Web', sans-serif]Else[/FONT]
[font='Titillium Web', sans-serif]a = textboxt1.[/FONT][font='Titillium Web', sans-serif]Text[/FONT]
[font='Titillium Web', sans-serif]b = textboxt2.[/FONT][font='Titillium Web', sans-serif]Text[/FONT]
[font='Titillium Web', sans-serif]label1.caption = a+b[/FONT]
[font='Titillium Web', sans-serif]End[/FONT][font='Titillium Web', sans-serif]If[/FONT]