تقييم الموضوع :
  • 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
الف شكر للجميع حل مريح جدا
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في حل رسالة خطأ تظهر لي Error 5000 loayrefai 3 71 15-10-17, 01:50 AM
آخر رد: Amir_alzubidy
  مساعدة تكملة فكرة الفاتورة حافظ حافظ 6 180 04-09-17, 11:04 PM
آخر رد: Amir_alzubidy
  ممكن مساعدة في ايجاد حل لهذه المشكلة الغريبة مبرمج جديد 2 121 01-08-17, 04:18 AM
آخر رد: مبرمج جديد
  مساعدة VB6 مشكل تنصيب ومكافح الفيروسات bidai 3 124 29-07-17, 06:23 PM
آخر رد: bidai
  [vb6.0] مساعدة بطريقة جمع التواريخ والأوقات shadi_alfares 2 100 27-07-17, 12:17 PM
آخر رد: shadi_alfares
  [vb6.0] مساعدة في فهم و تعلم صنع برنامج يعمل على سيرفر بقاعدة بيانات اكسس مربوطة بالادو larbihamri 6 210 10-06-17, 09:19 PM
آخر رد: Amir_alzubidy
  [سؤال] معرفة اسماء الجداول الموجودة داخل قاعدة بيانات أبوسعود 5 391 15-05-17, 11:28 PM
آخر رد: Ahmed_Mansoor
  مساعدة في تفعيل اداة VSFlexGrid ياسر عبد الكريم 4 480 28-04-17, 03:14 AM
آخر رد: أبوسعود
  مساعدة فى إخفاء الملفات عبد الرحمن على 2 254 21-04-17, 04:30 PM
آخر رد: عبد الرحمن على
  [vb6.0] مساعدة في تعديل هاذا المثال Abdellah 5 354 20-04-17, 05:38 PM
آخر رد: Abdellah

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


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