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

阳光穿透心脏的1/2处 2022-09-11 05:23 195阅读 0赞

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。  
除了获得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\\博客教程\\08 数据库\\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教程][vb.net] 目录

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

[vb.net]: https://www.xin3721.com/eschool/vbnetxin3721/