订阅专栏

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。

 

续上一节，将获得的数据库架构信息全部显示出来，这次不用循环，直接使用DataGridView来显示：

 

    Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click

        Dim odc As New OleDbConnection()

        odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:\save\博客教程\08 数据库\Northwind.mdb"

        odc.Open()

        Dim dt As DataTable

        dt = odc.GetOleDbSchemaTable(OleDbSchemaGuid.Tables_Info, Nothing)

 

        DataGridView1.DataSource = dt

        odc.Close()

 

    End Sub

运行结果如下，可以左右拉动滚动条看看更多的信息：

 

 

 

 

 

 

 

这一次用了OleDbSchemaGuid的另外一个静态成员：

 

    Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click

        Dim odc As New OleDbConnection()

        odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:\save\博客教程\08 数据库\Northwind.mdb"

        odc.Open()

        Dim dt As DataTable

        dt = odc.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)

 

        DataGridView1.DataSource = dt

        odc.Close()

 

    End Sub

看看运行结果：

 

 

 

 

 

 

 

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

 

学习更多vb.net知识，请参看vb.net 教程 目录

 

 

————————————————

版权声明：本文为CSDN博主「VB.Net」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。

原文链接：https://blog.csdn.net/uruseibest/article/details/78786107