[VB.NET]ADO数据库处理-读出数据记录

发布时间：2020-12-16 23:59:17 所属栏目：大数据来源：网络整理

导读：Imports System.Data.OleDb '引入ADO.NET操作命名空间 Dim MyConnection As New OleDbConnection( "Provider=Microsoft.Jet.OLEDB.4.0;DataSource=" Application.StartupPath "/Book.mdb" ) Dim MyCommand As OleDbCommand Dim MyReader As OleDbDataReader

 
 ImportsSystem.Data.OleDb'引入ADO.NET操作命名空间 
DimMyConnectionAsNewOleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Application.StartupPath&"/Book.mdb")
DimMyCommandAsOleDbCommand
DimMyReaderAsOleDbDataReader
DimSQLAsString="SELECT略……"
Try
MyConnection.Open()
MyCommand=NewOleDbCommand(SQL,MyConnection)
MyReader=MyCommand.ExecuteReader()
WhileMyReader.Read'读取到窗口Text 
TxtAuthor.Text=MyReader("BookAuthor")
EndWhile
CatchcAsException
MsgBox(c.ToString,MsgBoxStyle.Exclamation&MsgBoxStyle.OkOnly,"错误")
EndTry
MyConnection.Close()
MyReader.Close()
MyCommand.Dispose()
 

（编辑：李大同）

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