here is my code it's work fine but it doesn't filter the data...

Private Sub GetRecords()
'Dim da As OleDbDataAdapter
da = New OleDbDataAdapter("Select * from FinalCustItemRSO where RSONO=" & _cboPrintRsoNo.Text & "", cn)
da.Fill(ds, "FinalCustItemRSO")
End Sub

how could i filter on it..?