Visual Basic

Public Class Form1

    Public xl As New Excel.Application
    Public xlsheet As Excel.Worksheet
    Public xlwbook As Excel.Workbook
    Public j As Integer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("Hello")

        xlwbook = xl.Workbooks.Open("D:\sample.xls")
        xlsheet = xlwbook.Sheets.Item(1)

        TextBox1.Text = xlsheet.Cells(2, 1) ' row 2 col 1
        TextBox2.Text = xlsheet.Cells(2, 2) ' row 2 col 2 


        xl.ActiveWorkbook.Close(False, "D:\sample.xls")
        xl.Quit()
    End Sub
End Class

Dim params As New List(Of Microsoft.Reporting.WinForms.ReportParameter)
params.Add(New Microsoft.Reporting.WinForms.ReportParameter("Param1", "ParamValue1", False))
params.Add(New Microsoft.Reporting.WinForms.ReportParameter("Param2", "ParamValue2", False))
params.Add(New Microsoft.Reporting.WinForms.ReportParameter("Param3", "ParamValue3", False))

'Compiles, but never returns true. Is it correct to create a new param to execute .contains?
If params.Contains(New Microsoft.Reporting.WinForms.ReportParameter("Param1")) Then
    Debug.Print("")
End If

'This doesn't compile, not sure of the correct way to perform a find
If params.Find(New Microsoft.Reporting.WinForms.ReportParameter("Param1")) Then
    Debug.Print("")
End If