اذهب الي المحتوي
أوفيسنا

ماهي فائدة الدالة with


aaabade
إذهب إلى أفضل إجابة Solved by AlwaZeeR,

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

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

me.text....

تكتب هكذا عن طريقها دون الحاجة الى 

with me

.text....

تقوم بتقليل الكود وعدم تكرار كلمة me دائما 

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

  • أفضل إجابة

من باب الاختصار في كتابة الأوامر وعدم تكرارها

مثال:

لو اردت تطبيق امر من النموذج الرئيسي للفرعي يكتب بدونها هكذا:

 

Forms!MainForm!SubFormName.Form.AllowEdits = Not Forms!MainForm!SubFormName.Form.AllowEdits.AllowEdits
Forms!MainForm!SubFormName.Form.AllowEdits.Requery
Forms!MainForm!SubFormName.Form.AllowEdits.SetFocus
Forms!MainForm!SubFormName.Form.AllowEdits.cmdName.Caption = "Test"
Forms!MainForm!SubFormName.Form.AllowEdits.cmdName.Enabled = False

ويكتب باستخدامها هكذا ولك حرية الاختيار 

انا عن نفسي استخدمها 

With SubFormName.Form
.AllowEdits = Not .AllowEdits
.Requery
.SetFocus
.cmdName.Caption = "Test"
.cmdName.Enabled = False
End With

المثال السابق 

1- لتحرير نموذج فرعي

2- عمل تحديث للنموذج الفرعي

3- نقل التركيز الى النموذج الفرعي

3- تغيير اسم زر امر الى تست في النموذج الفرعي

4- الغاء التمكين للزر السابق في النموذج الفرعي

ويتم الاستخدام بالطريقة السابقة حسب الحاجة التي تريدها

ولا يتم التطرق لها لان الاغلب يستخدمها في صمت ولا تشكل مشكلة 

::

 

تم تعديل بواسطه AlwaZeeR
  • Like 4
رابط هذا التعليق
شارك

اشكرك

الله يعطيك العافية

14 ساعات مضت, نبراس كاظم said:

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

me.text....

تكتب هكذا عن طريقها دون الحاجة الى 

with me

.text....

تقوم بتقليل الكود وعدم تكرار كلمة me دائما 

شكرا لك

12 ساعات مضت, AlwaZeeR said:

من باب الاختصار في كتابة الأوامر وعدم تكرارها

مثال:

لو اردت تطبيق امر من النموذج الرئيسي للفرعي يكتب بدونها هكذا:

 


Forms!MainForm!SubFormName.Form.AllowEdits = Not Forms!MainForm!SubFormName.Form.AllowEdits.AllowEdits
Forms!MainForm!SubFormName.Form.AllowEdits.Requery
Forms!MainForm!SubFormName.Form.AllowEdits.SetFocus
Forms!MainForm!SubFormName.Form.AllowEdits.cmdName.Caption = "Test"
Forms!MainForm!SubFormName.Form.AllowEdits.cmdName.Enabled = False

ويكتب باستخدامها هكذا ولك حرية الاختيار 

انا عن نفسي استخدمها 


With SubFormName.Form
.AllowEdits = Not .AllowEdits
.Requery
.SetFocus
.cmdName.Caption = "Test"
.cmdName.Enabled = False
End With

المثال السابق 

1- لتحرير نموذج فرعي

2- عمل تحديث للنموذج الفرعي

3- نقل التركيز الى النموذج الفرعي

3- تغيير اسم زر امر الى تست في النموذج الفرعي

4- الغاء التمكين للزر السابق في النموذج الفرعي

ويتم الاستخدام بالطريقة السابقة حسب الحاجة التي تريدها

ولا يتم التطرق لها لان الاغلب يستخدمها في صمت ولا تشكل مشكلة 

::

 

الف شكر

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

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