How to prevent new print report...

hi, here is my problem everytime press print button it always open new form how to prevent it..?

i want to refresh it instead..

here is my codes..

private sub formload

Dim newRep As New CrystalReportFillBy
OpenConnection()
GetRecords(UsePrintRSONO_rpt)
newRep .SetDataSource(ds)
newRep .Refresh()
CrystalReportViewer1.RefreshReport()

getRsoNoToBePrint()
cboPrintRsoNo.Text = ""

end sub

private sub buttonPrint
If cboPrintRsoNo.Text = "" Then
MessageBox.Show("Please Put RSONO Number to print The Data")
Exit Sub
End If
Dim fr As New PrintFinal
fr.UsePrintRSONO_rpt = Me.cboPrintRsoNo.Text
fr.Show()

end sub

it try with this code but i have error..

help me please..?

ds.Clear()

connPrintRSO = New OleDbConnection
connPrintRSO.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\ph-suman\rso\Rsodb.mdb;User Id=admin;Password=;"

' Dim newRep As New CrystalReportFillBy

openconnection()
GetRecords(UsePrintRSONO_rpt)
crystalReport.SetDataSource(ds)
crystalReport.Refresh()
CrystalReportViewer1.RefreshReport()

getRsoNoToBePrint()
cboPrintRsoNo.Text = ""