+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : ارجوا المساعدة (/showthread.php?tid=22478)
ارجوا المساعدة - gody_hm2010 - 09-11-17
السلام عليكم
عندي برنامج بسيط جدا لكن لم استطع تنفيذه لم اعرف السبب
في الخوارزمية مثلا قراءة عدد وحساب تربيعه كان باستخدام دالة القراءة كان البرنامج يعمل
ولكن باستخدام عددين وطباعة جمعهما لم تفلح هذه الطريقة ارجوا افادتي بالسبب وحل المشكلة
وشكرا
a = InputBox("input no1")
b = InputBox("input no2")
Sum = a + b
Print Sum
RE: ارجوا المساعدة - gody_hm2010 - 10-11-17
(09-11-17, 11:21 PM)gody_hm2010 كتب : السلام عليكموجدت الحل لا بد من تعريف المتغير a,b
عندي برنامج بسيط جدا لكن لم استطع تنفيذه لم اعرف السبب
في الخوارزمية مثلا قراءة عدد وحساب تربيعه كان باستخدام دالة القراءة كان البرنامج يعمل
ولكن باستخدام عددين وطباعة جمعهما لم تفلح هذه الطريقة ارجوا افادتي بالسبب وحل المشكلة
وشكرا
a = InputBox("input no1")
b = InputBox("input no2")
Sum = a + b
Print Sum
RE: ارجوا المساعدة - eiocm - 10-11-17
a = Val(InputBox("input no1"))
b = Val(InputBox("input no2"))
Sum = a + b
Print Sum