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

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


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