作っておいたExcelをvisual studioで読み込んでtextBoxやlabelにセルの内容を表示したいのですがどうすれば良いのかわかりません。

###前提・実現したいこと
ここに質問したいことを詳細に書いてください
visual studioの初心者です。あらかじめ作っておいたExcelをvisual studioで読み込んでtextBoxやlabel(Windows visual basic)にセルの内容を表示したいのですがどうすれば良いのかわかりません。ソースコードを教えてください。

###発生している問題・エラーメッセージ
System.Data' は名前空間であり、式としては使用することはできません。
'C1Excel' と class 'C1Excel' が namespace 'WindowsApp2.C1' で競合しています。
BC30367 クラス 'XLSheet' には既定のプロパティがないため、インデックス処理を実行できません。

エラーメッセージ

###該当のソースコード
Imports C1Excel

Public Class Form1

Private wb As New C1XLBook()
Private i As Integer = 0

Private Sub Label1_Click(sender As Object, e As EventArgs) Handles tv1.Click
    Dim sheet1 As XLSheet = wb.Sheets("Sheet1")
    Dim data As String

    Me.ListBox1.Items.Clear()
    wb.Load("C:\Users\naoya\Book2.xlsx")

    i = 1
    Do
        i += 1
        data = sheet1(i, 0).Value
        If data <> "" Then
            Me.ListBox1.Items.Add(data)
        End If
    Loop While data <> ""

End Sub

Private Function ListBox1() As Object
    Throw New NotImplementedException()
End Function

Private Sub Label2_Click(sender As Object, e As EventArgs) Handles tv2.Click


    Me.ListBox1.Items.Clear()
    wb.Load("C:\Users\naoya\東海道・山陽新幹線.xlsx")

    i = 1
    Do
        i += 1
        Data = sheet1(i, 0).Value
        If Data <> "" Then
            Me.ListBox1.Items.Add(Data)
        End If
    Loop While Data <> ""

End Sub

Private Function sheet1(i As Integer, v As Integer) As Object
    Throw New NotImplementedException()
End Function

Private Sub Label3_Click(sender As Object, e As EventArgs) Handles tv3.Click

End Sub

Private Sub Label4_Click(sender As Object, e As EventArgs) Handles tv4.Click

    Dim sheet1 As XLSheet = wb.Sheets("Sheet1")
    Dim data As String

    Me.ListBox1.Items.Clear()
    wb.Load("C:\Users\naoya\Book2.xlsx")

    i = 1
    Do
        i += 1
        data = sheet1(i, 0).Value
        If data <> "" Then
            Me.ListBox1.Items.Add(data)
        End If
    Loop While data <> ""

End Sub

Private Sub Label5_Click(sender As Object, e As EventArgs) Handles tv5.Click

End Sub

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

    

End Sub

Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged

    wb.Load("j:\data\winelist.xls")

End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

End Sub

End Class

Friend Class XLSheet
End Class
###試したこと
課題に対してアプローチしたことを記載してください

###補足情報(言語/FW/ツール等のバージョンなど)
より詳細な情報