برنامه ای بنویسید که یک عدد 2 رقمی بخواند و مجموع ارقام آن را چاپ کند.

کدها یه صورت زیر میباشند:

()Private Sub cmdExit_Click
End
End Sub
-----------------------------------------------------
()Private Sub cmdRun_Click
Dim a As Integer
("a = InputBox("yek adade 2 raghami vared konid
Dim b As Integer
(b = (a \ 10
Dim b1 As Integer
(b1 = (a Mod 10
Print Spc(14); b + b1
End Sub

-----------------------------------------------------

برای دانلود کلیک کنید:

http://s3.picofile.com/file/7668395478/jam.exe.html