主题：[求助]卸载数据源所有的表的代码要怎么写？

Dim ls As new List(Of String)
For Each dt As DataTable In DataTables
    If dt.ConnectionName = "abc" Then
        ls.add(dt.name)
    End If
Next
For Each s As String In ls
    DataTables.Unload(s)
Next