<br /> Imports Microsoft.Reporting.WinForms<br /> Private Sub btnload_Click(sender As Object, e As EventArgs) Handles btnload.Click<br /> setFilterparameters()<br /> End Sub<br /> Private Sub setFilterparameters()<br /> Me.purchasesTableAdapter.Fill(Me.DSPurchases.purchases)<br /> Dim account As New ReportParameter("account", acno.Text)<br /> ReportViewer1.LocalReport.SetParameters(New ReportParameter() {account})<br /> ReportViewer1.RefreshReport()<br /> <br /> End Sub<br />
SELECT bill_no AS Expr1, ac_no AS Expr2, items AS Expr3, length AS Expr4, breadth AS Expr5, amount AS Expr6, dated AS Expr7, bill_no, ac_no, items, length, breadth, amount, datedFROM purchasesWHERE (ac_no = ?)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)