لیست ریپورت ها در کمبو باکس

[IMANAZADI]

با سلام
چطوری میشه لیست REPORT ها را در یک کمبو باکس در یک فرم نشون داد
با تشکر

[Abbas Amiri]

می توانید کد زیر را درمحل دلخواه از برنامه اتان قرار دهید:

    Dim rpt As AccessObject

    Combo1.RowSourceType = "Value List"

    For Each rpt In CurrentProject.AllReports

        Combo1.AddItem rpt.Name

    Next