See the following Link to Convert C#.Net Code To VB.Net :
http://converter.telerik.com/[
^]
Here is your Code :
RptVwer.Reset()
RptVwer.ProcessingMode = Microsoft.Reporting.WinForms.ProcessingMode.Local
RptVwer.LocalReport.ReportPath = Environment.CurrentDirectory & "\ItemListByCategory.rdl"
Dim _mParaList As Generic.List(Of ReportParameter) = New Generic.List(Of ReportParameter)
Dim _mReportParam1 As ReportParameter = New ReportParameter("CategoryID", CategoryID.ToString())
_mParaList.Add(_mReportParam1)
RptVwer.LocalReport.SetParameters(mParaList)
Dim dsSummary As DataSet = Reports.ItemList_ByCategory(CategoryID)
Dim rdS As New ReportDataSource("DataSet1", dsSummary.Tables(0))
RptVwer.LocalReport.DataSources.Clear()
RptVwer.LocalReport.DataSources.Add(rdS)
RptVwer.ServerReport.Refresh()
RptVwer.RefreshReport()