Assuming you have a table ztblReports with fields rptName, rptTitle,
rptStatus, rptDescription. The rptName field contains the actual name of the
report ie: rptProjectStatus. Your combo box would have a Row Source property
like:

SELECT rptName, rptTitle, rptDescription
FROM ztblReports
WHERE rptStatus <> 0
ORDER BY rptTitle;

Some other properties would be:
Name: cboReport
Column Widths: 0, 2, 0
Bound Column: 1
Column Count: 3

Your code to open a report would be something like:

Dim strRptName as String
If Not IsNull(Me.cboReport) Then
  strRptName = Me.cboReport
  DoCmd.OpenReport strRptName, acPreview
Else
  Msgbox "Choose a report", vbOkOnly, "PEBKAC"
End If