print selected datagrid rows with crystal reports

See more:

VB

SQL-Server

ADO.NET

, +

Hello,
I have an application which connects to an sql server database and adds data to the database, I have a query that searches for specific records and displays them to a datagrid, I want to print from the datagrig only the user selected rows of the datagrid, I found that I must use a fornula in cr, here is the code I have find and add some of mine.

Dim i As New Int32
       Dim rpt As New CrystalReport7()
       i = 0
       rpt.SetDataSource(DataSet31)
       For i = 0 To Me.DataGridView1.SelectedRows.Count
           print.CrystalReportViewer1.SelectionFormula = String.Format("{{me.Table_1.id}} = '{i}'", Me.DataGridView1.SelectedCells(i).Value)
       Next
       print.CrystalReportViewer1.ReportSource = rpt
       print.Show()

but i thing it is not correct, any help?