اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

سؤال حول مناداة الدوال


الردود الموصى بها

السلام عليكم

أريد أن أعرف كيفية وضع باراميترز داخل دالة فى صفحة الكود

بحيث أستطيع تطبيق هذه الدالة فى أكثر من مكان عن طريق مناداتها

أرفقت ملف صغير لتوضيح الطلب

فيه قائمتين منسدلتين ومتغيرين a,b يؤديان نفس الغرض

أريد أن أعرف كيف يمكن عمل دالة واحدة داخل الكود ووضع قائمة منسدلة ومتغير داخلها

على هيئة باراميتر

ثم المناداه على هذه الدلة ووضع القائمة المنسدلة الأولى والمتغير a

وبعد ذلك

المناداه على هذه الدلة ووضع القائمة المنسدلة الثانية والمتغير b

ولكم جزيل الشكر

Parameters.rar

رابط هذا التعليق
شارك

عليكم السلام أحمد فريد

لا أدرى ماذا يدور بخلدك

عموما

حولت الكود الخاص بك إلى وظيفة

Private Function mypro(c1 As ComboBox, c2 As ComboBox)

Dim a As Integer

Dim b As Integer

If c1.Value = 1 Then

a = 20

End If

If c1.Value = 2 Then

نناديها من خلال زر الأمر و نحتاج لعملها إلى تحديد اسم مربعى التحرير هكذا
Private Sub CommandButton1_Click()

mypro ComboBox1, ComboBox2

End Sub

لكن الاستفادة من ذلك

هى أن تنادى الوظيفة باستخدام مربعات تحرير و سرد مختلفة تعينها أنت

فانظر ماذا تريد

Parameters-kemas.rar

رابط هذا التعليق
شارك

شكرا يا أخى

أنا فقط كنت أريد أن أعرف عندما أقوم بالمناداه على دالة بها متغيرات

كيفية النداء على هذه الدالة(Syntax) الخاص بها

حيث أننى كنت أضع المتغيرات داخل أقواس

حيث أننى قد درست لغة # C وهذا هو المتبع بها

ولم أعمل من قبل بالبيسك

وهناك إختلافات فى الصيغ الخاصة بالكتابة

ولذلك لم يعمل معى الكود

ما كنت أريده بالضبط هو السطر التالى

mypro ComboBox1, ComboBox2

وبالمناسبة إسمى محمد فريد وليس أحمد فريد

شكرا جزيلا

سلام عليكم

تم تعديل بواسطه Mohammed Farid
رابط هذا التعليق
شارك

السلام عليكم

استاذنا الكبير كيماس

كود جميل يا معلمنا

اني شخصيا قد تعلمت منه

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

:clapping: :clapping: :clapping:

:fff: :fff: :fff: :fff: :fff:

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information