vb.net 教程 8-3 数据库操作8

前端之家收集整理的这篇文章主要介绍了vb.net 教程 8-3 数据库操作8前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

本节再接再厉,看看数据库还有些什么样的架构。

上一节的学习,我们已经知道使用 OleDbConnection.GetOleDbSchemaTable来获得数据库的架构,

GetOleDbSchemaTable 的声明如下:

Public Function GetOleDbSchemaTable ( schemaAs Guid,restrictions AsObject() ) As DataTable

schema是System.Data.OleDb.OleDbSchemaGuid类,实际使用的时候是使用的OleDbSchemaGuid 的值之一,

它指定要返回的架构表。MSDN解释中指明了该类有很多静态成员(以下是部分):

为了看看所有的表架构信息,可以将OleDbSchemaGuid成员一一列出来,再根据成员写代码

但是

很麻烦。

所以

本例子中将使用一点高级的技术——反射:Reflection

通过反射获得所有的成员信息:

    Private Sub Form2_Load(sender As Object,e As EventArgs) Handles MyBase.Load
        Dim OleDbSchemaGuidType As Type = GetType(OleDbSchemaGuid)
        For Each OleDbSchemaGuidType_Member As Reflection.MemberInfo In OleDbSchemaGuidType.GetMembers
            If OleDbSchemaGuidType_Member.MemberType = Reflection.MemberTypes.Field Then
                ComboBox1.Items.Add(OleDbSchemaGuidType_Member.Name)
            End If
        Next
    End Sub
运行时可以看到,在ComboBox中列出了所有的 OleDbSchemaGuid成员:

按下按钮后根据选择的表架构类型获得相应的信息填充到DataGridView中:

    Private Sub Button14_Click(sender As Object,e As EventArgs) Handles Button14.Click
        Dim OleDbSchemaGuidType As Type = GetType(OleDbSchemaGuid)
        For Each OleDbSchemaGuidType_Member As Reflection.MemberInfo In OleDbSchemaGuidType.GetMembers
            If OleDbSchemaGuidType_Member.Name = ComboBox1.Text Then

                Dim odc As New OleDbConnection()
                odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:\save\博客教程\08 数据库\Northwind.mdb"
                Try
                    odc.Open()
                    Dim dt As DataTable
                    dt = odc.GetOleDbSchemaTable(OleDbSchemaGuidType.InvokeMember(OleDbSchemaGuidType_Member.Name,Reflection.BindingFlags.GetField,Nothing,Nothing),Nothing)  ' (OleDbSchemaGuidType_Member.DeclaringType,Guid),Nothing)

                    DataGridView1.DataSource = dt

                Catch ex As Exception
                    MessageBox.Show("错误信息:" & ex.Message)
                Finally
                    odc.Close()
                End Try

            End If
        Next
    End Sub
比如选择Columns的架构信息:

当然并不是所有的架构信息都支持mdb数据库,幸好我们在代码中设置了Try...Catch...防止错误发生导致程序崩溃,仅仅出现一个提示


由于本章属于数据库操作,所以对于反射不会详细讲解,大家掌握数据架构相关知识就行了。

以后有机会再慢慢讲讲反射。


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

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

猜你在找的VB相关文章