مجموعة من اكواد الاكسيس الهامة

[أبو امين]

وجدت هذه الاكواد فاردت ان يستفاد منها المبرمج المبتدئ مثلي 

1 DoCmd.OpenForm "", acNormalفتح نموذج

2 DoCmd.OpenQuery "", acViewNormalفتح استعلام

3 DoCmd.OpenReport "", acViewNormalفتح تقرير

4 DoCmd.OpenTable "", acViewDesignفتح جدول

5 DoCmd.CloseacForm, ""

فتح نموذج 6 DoCmd.CloseacQuery, "" فتح استعلام

7 DoCmd.CloseacReport, ""

فتح تقرير 8 DoCmd.CloseacTable, "" فتح جدول

9 DoCmd.Beepصوت بيب + فيديو

10 DoCmd.CancelEventالغاء الامر

11 DoCmd.Quitاغلاق البرنامج

12 DoCmd.CloseDatabaseاغلاق قاعدة البيانات

13 DoCmd.DeleteObjectacForm, "" حذف نموذج

14 DoCmd.DeleteObjectacQuery, "" حذف استعلام

15 DoCmd.DeleteObjectacReport, "" حذف تقرير

16 DoCmd.DeleteObjectacTable, "" حذف جدول

17 DoCmd.GoToRecord , , acFirstالذهاب للسجل الاول

18 DoCmd.GoToRecord , ,acLastالذهاب للسجل الاخير

19 DoCmd.GoToRecord , ,acNewRecالذهاب للسجل الجديد

20 DoCmd.GoToRecord , ,acNextالذهاب للسجل التالى

21 DoCmd.GoToRecord , ,acPreviousالذهاب للسجل السابق

22 DoCmd.GoToRecord , , acGoTo, 2 الذهاب للسجل رقم2

23 DoCmd.Maximizeتكبير 24 DoCmd.Minimizeتصغير

25 DoCmd.Restoreاستعادة الوضع

26 DoCmd.MoveSize 2000, 5000 تموضع النموذج من الاعلى5000 واليسار2000

27 DoCmd.RefreshRecordتحديث الصفحة

28 DoCmd.Rename "2", acForm, "20" تغير اسم نموذج من 20 الى2

29 DoCmd.Rename "2", acQuery, "20" تغير اسم استعلام

30 DoCmd.Rename "2", acReport, "20" تغير اسم تقرير

31 DoCmd.Rename "2", acTable, "20" تغير اسم جدول

32 DoCmd.Requeryاعادة الاستعلام

33 [].Requeryاعادة استعلام داخل متغير

34 DoCmd.RunCommandacCmdDataEntryتحويل النموذج الى ادخال بيانات فقط

35 DoCmd.RunCommandacCmdNewObjectFormفتح معالج نموذج

36 DoCmd.RunCommandacCmdNewObjectQueryفتح معالج استعلام

37 DoCmd.RunCommandacCmdNewObjectReportفتح معالج تقرير

38 DoCmd.RunCommandacCmdNewObjectTableفتح معالج جدول

39 DoCmd.RunCommandacCmdOptionsفتح شاشة خيارات

40 DoCmd.RunCommandacCmdStartupPropertiesفتح بدا التشغيل

41 DoCmd.RunCommandacCmdOutputToExcelتصدير نموذج مجدول الى اكسيل

42 DoCmd.RunCommandacCmdPrintمربع حوار الطباعة

43 DoCmd.RunCommandacCmdQuickPrintطباعة الحالى

44 DoCmd.RunCommandacCmdRegisterActiveXControlsإظهار مربع حوار تسجيل عناصر تحكم أكتف أكس 45 DoCmd.RunCommandacCmdRelationshipsالعلاقات

46 DoCmd.RunCommandacCmdUndoتراجع عن

47 DoCmd.RunCommandacCmdWindowHideاخفاء جزء الانتقال

48 DoCmd.OpenReport "2", acViewPreviewDoCmd.RunCommand acCmdZoom500 فتح التقرير فى حجم 5 اضعاف

49 DoCmd.SetWarnings False ايقاف رسائل التاكيد الاجرائية

50 DoCmd.ShowToolbar "ribbon", acToolbarNoاخفاء الاشرطة

 

[abouelhassan]

مشكور مجهودك الرائع اخى الكريم

[SAROOK]

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

[Matin_Murad]

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

[Eng.Qassim]

الله يبارك بعمرك ورزقك طالما انك تسعى لافادة الاخرين..

بالمناسبة ... مامعنى derbali؟

هل هو اسم ام كنية ؟

لانها بالعراقي تعني ... I care of my self

تم تعديل مايو 13, 2022 بواسطه Eng.Qassim

[أبو امين]

Derbali بالفرنسية اي دربالي باللغة العربية وهو لقب العائلة : لقب منتشر كثيرا بتونس و الجزائر و المغرب و ليبيا 

مشكور اخي على المرور 

و على  قول استاذنا :Eng.Qassim

I care of my self 

على الاقل في جانب تعلم البرمجة 

تم تعديل مايو 13, 2022 بواسطه derbali ammar