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

除了获得sql查询值，如果需要获得表结构，那么使用以下代码：

    Private Sub Button3_Click(sender As Object,e As EventArgs) Handles Button3.Click
        Dim odc As New OleDbConnection()
        odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:save博客教程8 数据库Northwind.mdb"

        Dim odcommand As New OleDbCommand()
        odcommand.CommandText = "产品"
        odcommand.CommandType = CommandType.TableDirect
        odcommand.Connection = odc
        odc.Open()

        Dim odReader As OleDbDataReader
        odReader = odcommand.ExecuteReader(CommandBehavior.SingleResult)

        Dim queryString As String = ""

        For i As Integer = 0 To odReader.FieldCount - 1
            queryString &= odReader.GetName(i) & "   " & odReader.GetDataTypeName(i) & "  " & odReader.GetFieldType(i).ToString

            queryString &= vbCrLf
            Next

        odc.Close()
        TextBox1.Text = queryString
    End Sub

CommandType 设置为TableDirect，指定了查询的是表，默认是Text，即sql语句，查询的文本。

对应的CommandText设置为表名称就可以了。

接下来，我们使用循环，从0到表中列数量-1

GetName:列名

GetDataTypeName:列类型，可以参看 Microsoft Access Data Types https://docs.microsoft.com/en-us/sql/odbc/microsoft/microsoft-access-data-types

GetFiledType:列在.net中的类型

运行结果如下：

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

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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!