شكرا لك يااستاذ خليل
على المجهود الرااااااااااااااااااااااااائع
:)

شكرا على المرور يقين الزهراء

و ننتظر برامجك

الاستاذ خليل

استاذنا الفاضل ابو خليل
بارك الله فيك على جهودك الجبارة
جعلها الله في ميزان حسناتك
الى الامام بورك فيك

هذا الاسلوب جميل و مشوق ولكنني اواجه مشكلة في انه لا يوجد عندي هذا البرنامج

جزاك الله كل خير

بارك الله في الجميع وبالاخص الاستاذ خليل

الى الاستاذ العظيم
ما تفعله عمل عظيم واجره كبير
فشكرا على هذا الشرح الوافي البديع
وتحية وعرفانا من الجميع

نحن بخدمتكم بعون الله

والله أشكرك من كل قلبي

تحياتي لك

جزاكم الله خيرا
وجعل ذلك في ميزان حسناتكم

بسم الله الرحمن الرحيم
استاذنا العزيز .. بارك الله فيكم .
عندى سؤال هام جدا ولن يعطينى اجابة سواكم.
صنعت برنامج صغير للتحويل ولكن هناك ارقام تظهر تعطى أخطاء كمثل ارقام عشرية كثيرة أو ارقام اكثر ماتسع الشاشة برجاء التكرم بإفادتى بأمر يجعل الرقم اذا زاد عن الحد يعطى تقريب مثلا لاقرب اربعة ارقام عشرية فقط , او اذا كان الرقم الصحيح اكبر من المسموح به فى الشاشة يقسم الناتج على 10 ومشتقاتها مع بيان ذلك فى الرقم المطبوع.
اعرف بأنى اثقلت عليكم ولكنى اثق فى قدرتكم العلمية وسعة صدركم .
اخوكم / فتحى

يوجد دالة للتقريب يعني ممكن تقص الاعداد العشرية من خلال الامر int()

او التقريب
إستعمل الدالة Round
Round(expression [,numdecimalplaces])

Dim numberRounded as Double
numberRounded = Val(Text1.Text)
Text1.Text = Round(numberRounded)

رسالة
 

الاستاذ خليل ابراهيم المحترم بعدالتحيةوالاحترام
دمت ذخراللرياضيات اول ماكتبته في مستطيل قوقل كلمة الرياضيات ممايدل حبي للرياضيات
فابحرت في محيط الانترنت فرست سفينتي علىشاطي جزيرة العامرةبوجودكم فظللت ابحث عن تاشيرة الدخول
عضوجديد
اريد معرفت الأصدقاء
aldobasi46
e-mail:[email protected]

حياك الله اخي بين اهلك اسرة جزيرة الرياضيات