** listbox PROCEDURE Init() WITH this .RowSourceType = 5 .RowSource = "thisform.aList" .ColumnCount = 1 ENDWITH SELECT report_desc, report_prog ; FROM reportlist ; INTO ARRAY thisform.aList this.Requery() ENDPROC ** end listbox ** form method, called from cmdPrint.Click() PROCEDURE RunReports WITH this.listbox lcProg = .List(.ListIndex,2) lnPrintTo = .opgPrintTo.Value DO (lcProg) WITH lnPrintTo && and any other params... ENDWITH ENDPROCDoes something like that work?