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

اريد شرح بسيط لهذا الكود


firemaha
إذهب إلى أفضل إجابة Solved by محمد طاهر عرفه,

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

رجاء شرح الكود التالى

Like Trim([forms]![DALIL_MAIN]![S_CODE]) & "*"

و ما معنى 

trim

و like

و لية تم وضع 

*

في اخر الجملة

in combobox there is property called

Row source type has  value

table/query and Value List and Field List

هل اجد اى عضو موقر يشرح لى ما معناهم


و الف شكر

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

و الف شكر

و ما معنى

 Dim Ct As String

  Dim S1 As String, S2 As String


  Ct = """"

  Select Case Me.OptSearch

    Case 1: S1 = "":  S2 = "*"

    Case 2: S1 = "*": S2 = "*"

    Case 3: S1 = "*": S2 = ""

  End Select

و ما فادة 

send key , f2

 Call CmbFields_AfterUpdate

  Me.S_CODE.SetFocus

  SendKeys "{F2 3}"

و الف شكر لكم

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

  • أفضل إجابة

يبدو لي أن هذا الكود خاص بالاكسس و ليس الاكسيل

فاذا كان فيرجي طرح الموضوع فى قسم الاكسس

اما عن الدوال ، فهي واحدة فى كل ال vba في مختلف تطبيقاته

trim

تزيل الفراغات الموجودة قبل و بعد النص

تعبيرات

Like *m*

Like m*

Like *m
عن شرط أن النص : به m يبدأ ب m و يليه أي حاجة ينتهي ب m و قبلها أي حاجة send keys تقوم بمحل الكتابة علي ازرار محددة مثلا
SendKeys "%{F4}", True    

كانك كتبت

علي لوحة المفاتيح

ALT+F4

و بالنسبة لتعريف المتغيرات ، يوجد فى ارشيف قسم الاكسس شرح متميز للاخ حارث ، لاساسيات كتابة الاكواد

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

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

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

Important Information