[RESOLVED] Please solution Object reference not set to an instance of an object.

[roy88]

Dear All Master
I use openfolderdialog for connection to jet.oledb. Please solution.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim FolderBrowserDialog1 As New FolderBrowserDialog()
        FolderBrowserDialog1.SelectedPath = Directory.GetCurrentDirectory
        If FolderBrowserDialog1.ShowDialog() = DialogResult.OK Then
            TextBox1.Text = FolderBrowserDialog1.SelectedPath
        End If
    End Sub
    Dim Path As String = TextBox1.Text 'Object reference not set to an instance of an object.
    Dim cn = "provider=Microsoft.Jet.OLEDB.4.0; data source=" & Path & "; Extended Properties=dBase IV"
    Private Sub PopulateDataGridView()
        Try
            dt = New DataTable
            Dim query = "select ITM FROM ITEM."
            Using adapter As New OleDbDataAdapter(query, cn.ToString)
                adapter.Fill(dt)
            End Using
            Me.DataGridView1.DataSource = dt
        Catch myerror As OleDbException
            MessageBox.Show("Error: " & myerror.Message)
        Finally
        End Try
    End Sub

Thanks
roy88