Programalama > VISUAL BASIC.NET

Private Sub Command1_Click()
s1 = Val(Text1)
s2 = Val(Text2)
Top = s1 + s2
MsgBox Top, , "cevap"
End Sub


Private Sub Command2_Click()
s1 = Val(Text1)
s2 = Val(Text2)
çıkar = s1 - s2
MsgBox çıkar, , "cevap"


Private Sub Command3_Click()
s1 = Val(Text1)
s2 = Val(Text2)
çarp = s1 * s2
MsgBox çarp, , "cevap"


Private Sub Command4_Click()
s1 = Val(Text1)
s2 = Val(Text2)
böl = s1 / s2
MsgBox böl, , "cevap"
End Sub


Private Sub Command5_Click()
End
End Sub


&amp&amp#3541_____&amp&amp#3541_dmx anıl_&amp&amp#3540___&amp&amp#3540
dance_dmx@hotmail.com