فرز وفلترة

[cake2014]

السلام عليكم

انا لديا سؤال وهو انا فت تصميم  form & sub form (الملف الرئيسي  new main )  والملف الفرعي  (kafeel subform) وخاصة في حقل نوع الكفالة كيف يتم عزل اسماء الطلاب الذين لديهم كفالة عقارية لوحدهم عن الطلاب الذين لديهم كفالة شخصية فارجو مساعدتي ..

[.Azhar]

ماذا تقصد بعزلهم هل تقصد فلترتهم في الفورم نفسه ام ماذا ؟

اذا كنت تقصد فلترة للذين لديهم كفالة عقارية وبعدها الذين لديهم كفالة شخصية راجع هذا المثال .

http://www.officena.net/ib/index.php?showtopic=55712&hl=

تم تعديل سبتمبر 28, 2014 بواسطه .Azhar

[cake2014]

السلام عليكم .

نعم اقصد الفلترة لكل نوع على حدى (اسماء الطلاب ذات الكفالة الشخصية ) على حدى وكذلك الكفالة العقارية ايضا لكن عندما طبقت المثال ل استطيع الحصول على النتيجة المطلوب فارجو المساعدة

[alzahrani2014]

اذا ممكن ترفق القاعدة يكون افضل 

 

التعديل اسهل من الشرح فقد لايفهم ماترمي اليه

[cake2014]

السلام عليكم 

ارسلت الملف المرفق وانا اريد ان تظهر اسماء الطلاب ذوي الكفالة الشخصية بصورة مفصوله عن اسماء الطلاب ذوي الكفالة العقارية كل نوع على حدى لكي نستطيع الطباعة في تقارير منفصلة .

تم تعديل سبتمبر 29, 2014 بواسطه cake2014

[cake2014]

السلام عليكم 

ارسلت الملف المرفق وانا اريد ان تظهر اسماء الطلاب ذوي الكفالة الشخصية بصورة مفصوله عن اسماء الطلاب ذوي الكفالة العقارية كل نوع على حدى لكي نستطيع الطباعة في تقارير منفصلة .

27-9 final.rar

[.Azhar]

تفضل هذا التعديل لكن ليس على التقرير انا عملته لك على الاستعلام يمكنك ان تصنع تقرير بناءً على الاستعلامات Qyr1 و Qyr2 

انا استخدمت الدالة Case وازرار اختيار 

عند اختيار شخصي والنقر على معاينة التقرير 

هذا هو الكود الخاص بالاوامر . 

Private Sub Command25_Click()
On Error GoTo Err_Command25_Click
Dim stDocName As String
Dim c As Integer
Dim f As String
c = Me.Frame15.Value
Select Case c
Case 1
f = "Qyr1"
Case 2
f = "QYR2"
Case 3
End Select
    DoCmd.OpenQuery f, acViewNormal
Exit_Command25_Click:
    Exit Sub
Err_Command25_Click:
    MsgBox "يتوجب عليك اختيار نوع الكفالة", , "AZHAR ALiraqee"
    Resume Exit_Command25_Click
End Sub

27-9 final.rar

تم تعديل سبتمبر 30, 2014 بواسطه .Azhar