版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
除了获得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教程 目录
————————————————
版权声明:本文为CSDN博主「VB.Net」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。