Загрузите данные из excel в datagridview in VB.NET

---

Еще неделю назад все работало, а теперь ничего не работает, что наводит меня на подозрение, что Microsoft что-то изменила в Net Framework, Windows 10 Anniversary Update или в PIA. В прошлом я просто использовал мастер для привязки моих данных в электронной таблице Excel к элементу управления DataGridView, и он просто работал. Но примерно неделю назад моя программа вдруг перестала загружать COM-библиотеку с ранним связыванием, но я смог заставить ее работать с поздним связыванием. Но он забил мой дисплей DataGridView (dgv), и я не смог его вернуть.

Что я уже пробовал:

Теперь, если я использую мастер, я просто получаю пустой dgv без каких-либо данных. Если я попытаюсь сделать это в коде, то команда OleDbAdapter.Fill (dataset) больше не работает, и он выдает исключение. Вот код, который я использую....

Imports System.Data.OleDb

Public Class Form1

    Dim con As String = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=C:\Users\Dave\Documents\clients.xls"
    Dim Myconn As OleDbConnection
    Dim da As OleDbDataAdapter
    Dim ds As DataSet
    Dim tables As DataTableCollection
    Dim src As New BindingSource

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Myconn = New OleDbConnection
        Myconn.ConnectionString = con
        ds = New DataSet
        tables = ds.Tables
        da = New OleDbDataAdapter("Select * from [clients]", Myconn)
        da.Fill(ds, "clients")  'this step fails and throws the exception
        Dim view As New DataView(tables(0))
        src.DataSource = view
        dgv.DataSource = view

    End Sub

End Class

---