listing vb 6.0 cetak crystal report - per periode
CR1ReportFileName = App.Path & "\report\rptJual.rpt"
CR1.SelectionFormula = "{Sales.salesDate}>=#" & TxtDate1.Value & "# and {Sales.salesDate} <= #" & TxtDate2.Value & "#"CR1.Action = 1
CR1.PageZoom 95
catatan: sesuaikan name icon, table dan field pada form anda,
***selamat mencoba***