فديوهات شروح برنامج مايكروسوفت أكسيس - موضوع متجدد

[alfa]

مرة أخرى
رابط تحميل ملف الشرح
https://drive.google.com/file/d/0Bw4...ew?usp=sharing

[alfa]

الفيديو
https://www.youtube.com/watch?v=AP6R...ature=youtu.be

[alfa]

رابط ملف الشرح
https://drive.google.com/file/d/0Bw4...ew?usp=sharing
السلام عليكم
كيف تجمع درجات طالب تختاره من النموذج
باستخدام دالة dsum
فيديو احترافى
مشاهدة ممتعة

[alfa]

اسم الفيديو:
شرح دالة dlookup فى أكسيس
الوصف :
السلام عليكم
نواصل شروح أكسيس الاحترافية
أشرح اليوم الجمعة 7 أكتوبر 2016 دالة dlookup
• البحث عن قيمة فى حقل نصى بدلالة حقل رقمى
• استخدام الدالة فى معيار استعلام
• استخدام الدالة فى الحصول على قيم نصية ثابتة
رابط ملف الشرح
https://drive.google.com/file/d/0Bw4...ew?usp=sharing
كلمات دلالية
شرح أكسيس dlookup,

رابط الفيديو
https://www.youtube.com/watch?v=bIt8...ature=youtu.be

[alfa]

طباعة التقرير مباشرة من نموذج
• طباعة التقرير من داخل التقرير
رابط ملف الشرح
https://drive.google.com/file/d/0Bw4...ew?usp=sharing

اسم الفيديو
طباعة التقرير من الداخل
الوصف
فيديو يشرح
• طباعة التقرير مباشرة من نموذج
طباعة التقرير من داخل التقرير
رابط ملف الشرح
https://drive.google.com/file/d/0Bw4...ew?usp=sharing

و كيفية إخفاء زر الأمر عند الطباعة
رابط برنامج
Pdfcreator
http://www.pdfforge.org/pdfcreator/download
الفيديو
https://www.youtube.com/watch?v=evDg...ature=youtu.be

[alfa]

اسم الفيديو
فلترة النموذج الفرعى من النموذج الرئيسى
الوصف
فيديو يشرح طريقة فلترة النموذج الفرعى من النموذج الرئيسى
فى أكسيس
وطريقة إلغاء هذه الفلترة
رابط ملف الشرح
https://drive.google.com/file/d/0Bw4...ew?usp=sharing
كود الفلترة
Private Sub mym_Change()
Me.subf.SetFocus
Me.subf.Form.Filter = "[smonth]=" & Me.mym
Me.subf.Form.FilterOn = True
End Sub
كود إلغاء الفلترة
Private Sub أمر15_Click()
Me.subf.Form.FilterOn = False
End Sub
رابط الفيديو
https://www.youtube.com/watch?v=AOeQ...ature=youtu.be

[alfa]

كيف تجعل قيمة حقل فى النموذج الفرعى تساوى حقلا فى الرئيسى
فيديو صامت
كود سطر واح
رابط ملف الشرح
https://drive.google.com/file/d/0Bw4...ew?usp=sharing
الكود فى حدث بعد التحديث للحقل فى النموذج الرئيسى
Me.subf.Form.Controls("smonth") = Me.newm
subf النموذج الفرعى
smonth الحق فى النموذج الفرعى
newm اسم الحقل فى النموذج الرئيسى
الفيديو
https://www.youtube.com/watch?v=39Ek...ature=youtu.be

[alfa]

كيف تنشئ تقويما روزنامة نتيجة سنوية بالأكسيس
باستخدام
دالة date******
دالة mod
حلقة التكرار for...next
رابط ملف الشرح
https://drive.google.com/file/d/0Bw4...ew?usp=sharing

الكود
Private Sub تفصيل_Format(Cancel As Integer, FormatCount As Integer)
On Error GoTo 1
Dim i As Integer

For i = 1 To 31
Me.Controls("j" & i) = Format(Date******([Forms]![mf1]![mmm], 1, Me.Controls("d" & i)), "ddd")

Next i

For i = 1 To 30
Me.Controls("no" & i) = Format(Date******([Forms]![mf1]![mmm], 11, Me.Controls("d" & i)), "ddd")
Next i


For i = 1 To 31
Me.Controls("de" & i) = Format(Date******([Forms]![mf1]![mmm], 12, Me.Controls("d" & i)), "ddd")
Next i

For i = 1 To 31
Me.Controls("oc" & i) = Format(Date******([Forms]![mf1]![mmm], 10, Me.Controls("d" & i)), "ddd")
Next i

For i = 1 To 30
Me.Controls("se" & i) = Format(Date******([Forms]![mf1]![mmm], 9, Me.Controls("d" & i)), "ddd")
Next i


For i = 1 To 29
Me.Controls("f" & i) = Format(Date******([Forms]![mf1]![mmm], 2, Me.Controls("d" & i)), "ddd")
Next i
Dim ss As Integer
ss = [Forms]![mf1]![mmm] Mod 4
Me.f29.Visible = ss = 0


For i = 1 To 31
Me.Controls("ma" & i) = Format(Date******([Forms]![mf1]![mmm], 3, Me.Controls("d" & i)), "ddd")
Next i
For i = 1 To 30
Me.Controls("ap" & i) = Format(Date******([Forms]![mf1]![mmm], 4, Me.Controls("d" & i)), "ddd")
Next i

For i = 1 To 31
Me.Controls("may" & i) = Format(Date******([Forms]![mf1]![mmm], 5, Me.Controls("d" & i)), "ddd")
Next i

For i = 1 To 30
Me.Controls("yo" & i) = Format(Date******([Forms]![mf1]![mmm], 6, Me.Controls("d" & i)), "ddd")
Next i

For i = 1 To 31
Me.Controls("yl" & i) = Format(Date******([Forms]![mf1]![mmm], 7, Me.Controls("d" & i)), "ddd")
Next i

For i = 1 To 31
Me.Controls("og" & i) = Format(Date******([Forms]![mf1]![mmm], 8, Me.Controls("d" & i)), "ddd")
Next i
1:
End Sub
جارى رفع الفيديو