تقييم الموضوع :
  • 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 ك ب / التحميلات : 10)
الرد }}}}
تم الشكر بواسطة:
#4
على ما يبدو انه يوجد خطأ في المرفق قمت بتصحيحه




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

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

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


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


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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] اين الخطأ في الجملة محمد ئوزبك 5 125 12-02-17, 11:04 PM
آخر رد: محمد ئوزبك
Photo اريد مساعدة في جمع خليتين في عمود واحد يحملان نفس التاريخ عمر سالم 10 181 02-02-17, 01:58 AM
آخر رد: السيد الغالي
  ممكن مساعدة في تعديل كود استرجاع مبرمج جديد 8 97 31-01-17, 02:10 AM
آخر رد: sendbad100
  [مثال] طلب مساعدة في هاذا المثال listView Abdellah 3 133 22-01-17, 02:19 PM
آخر رد: Abdellah
  مساعدة في تفعيل اداة VSFlexGrid ياسر عبد الكريم 3 188 06-01-17, 12:04 AM
آخر رد: ياسر عبد الكريم
  [ تمّ الحل ] : ما سبب ظهور رسالة الخطأ لو سمحتم عبد العزيز البسكري 2 101 09-12-16, 04:07 PM
آخر رد: عبد العزيز البسكري
  مساعدة في تطبيق هذا الكود bidaya 0 120 06-12-16, 04:46 AM
آخر رد: bidaya
Wink هل من مساعد في معرفة نسخ أسطر محددة؟؟؟ KamelArab 4 245 25-11-16, 08:04 PM
آخر رد: KamelArab
  [سؤال] ممكن مساعدة في ايجاد كود او اداة لاظهار جدول في واجهة البرنامج مبرمج جديد 2 209 09-11-16, 03:48 AM
آخر رد: مبرمج جديد
  [vb6.0] مساعدة عاجلة من الاخوة الكرام (ادارج صورة من فيجوال بيسك الى ملف وورد) sher 1 302 08-11-16, 02:32 AM
آخر رد: AL_BRNS

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


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