تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في معرفة الخطأ
#1
السلام عليكم

احاول كتابة function

إقتباس :
كود :
Public Function b()

Dim mb As String
m = Text3.Text
mb = List3.List(m - 1)
MsgBox mb
If mb = "+" Then Text1.Text = Text2.Text + Text4.Text
If mb = "-" Then Text1.Text = Text2.Text - Text4.Text
If mb = "/" Then Text1.Text = Text2.Text / Text4.Text
If mb = "*" Then Text1.Text = Text2.Text * Text4.Text
If mb = "^" Then Text1.Text = Text2.Text ^ Text4.Text

فاين الخطأ

و كود الاستعمال
الرد }}}}
تم الشكر بواسطة:
#2
اخي الكريم ارفق لنا المشروع
للتعديل عليه وتتبع الخطأ
الرد }}}}
تم الشكر بواسطة:
#3
هذا هو جزء من المشروع فقط اضغط على الكوماند يطلعلك الخطأ الذي يظهر لي


الملفات المرفقة
.rar   cal.rar (الحجم : 1.51 ك ب / التحميلات : 24)
الرد }}}}
تم الشكر بواسطة:
#4
على ما يبدو انه يوجد خطأ في المرفق قمت بتصحيحه




او اعطوني كود الفاكنشن

الذي يقوم بالعملية التالية

إقتباس :
PHP كود :
text1.text=val(text2.text)+val(text4.text


و كيفية استعماله في كوماند


الملفات المرفقة
.rar   cal.rar (الحجم : 1.55 ك ب / التحميلات : 23)
الرد }}}}
تم الشكر بواسطة:
#5
احذف الكود التالي
(Form1.b (1 وسيعمل لديك المشروع .. ارجو توضيح الفكرة من المشروع ان امكن
الرد }}}}
تم الشكر بواسطة:
#6
ارجو ان يكون تعديلي على مشروعك هو المطلوب


الملفات المرفقة
.rar   cal.rar (الحجم : 1.61 ك ب / التحميلات : 30)
الرد }}}}
تم الشكر بواسطة: المستعين بالله , asto
#7
انظر الى مرفق الاخ العبيدي
فهو قام بتصحيح الخطأ
وعذراً على التأخير
اتمنى ان تكون مشكلتك قد حلت .
الرد }}}}
تم الشكر بواسطة: asto
#8
الف شكر للجميع حل مريح جدا
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] مساعدة لوتكرمتم في صنع برنامج تخفيضات Visual Basic 8 101 17-11-17, 12:00 AM
آخر رد: Visual Basic
  مساعدة في البحث والجمع sulimanalahdl 4 106 10-11-17, 02:17 AM
آخر رد: sulimanalahdl
  مساعدة في حل رسالة خطأ تظهر لي Error 5000 loayrefai 3 109 15-10-17, 01:50 AM
آخر رد: Amir_alzubidy
  مساعدة تكملة فكرة الفاتورة حافظ حافظ 6 225 04-09-17, 11:04 PM
آخر رد: Amir_alzubidy
  ممكن مساعدة في ايجاد حل لهذه المشكلة الغريبة مبرمج جديد 2 149 01-08-17, 04:18 AM
آخر رد: مبرمج جديد
  مساعدة VB6 مشكل تنصيب ومكافح الفيروسات bidai 3 166 29-07-17, 06:23 PM
آخر رد: bidai
  [vb6.0] مساعدة بطريقة جمع التواريخ والأوقات shadi_alfares 2 142 27-07-17, 12:17 PM
آخر رد: shadi_alfares
  [vb6.0] مساعدة في فهم و تعلم صنع برنامج يعمل على سيرفر بقاعدة بيانات اكسس مربوطة بالادو larbihamri 6 286 10-06-17, 09:19 PM
آخر رد: Amir_alzubidy
  [سؤال] معرفة اسماء الجداول الموجودة داخل قاعدة بيانات أبوسعود 5 439 15-05-17, 11:28 PM
آخر رد: Ahmed_Mansoor
  مساعدة في تفعيل اداة VSFlexGrid ياسر عبد الكريم 4 530 28-04-17, 03:14 AM
آخر رد: أبوسعود

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم