strsql = "SELECT * from table" 'สั่งเดียวกับที่คุณใส่ใน datagrid
Dim ds As New DataSet
Dim da As New MySqlDataAdapter
da.SelectCommand = New MySqlCommand(strsql, MDIMain.MyCon)
da.Fill(ds, "T")
Dim re as new Object=rpt_Conclusionrevenue
re.SetDataSource(ds.Tables("T"))
CRVView.ReportSource = re