前言：
现时我们对“vb连接access数据库并按日期段查询”大致比较重视，各位老铁们都需要学习一些“vb连接access数据库并按日期段查询”的相关知识。那么小编在网络上收集了一些关于“vb连接access数据库并按日期段查询””的相关文章，希望咱们能喜欢，朋友们快快来了解一下吧！VB小程序，关注我有更多的有趣的VB小程序
如果要使用.accdb格式的数据库，首先在工程下引用“Microsoft ActiveX Data Objects 6.1 library”
界面：
代码：
Private Sub Command1_Click()
Dim conn As New ADODB.Connection '创建Connection连接对象
Dim rs As New ADODB.Recordset '创建Recordset记录集
Dim i%
Dim a(1 To 11) As Integer
i = 1
conn.ConnectionString = "Provider=Microsoft.ace.oledb.12.0;data source=E:\mydata\零件.accdb" '确定连接的数据库
conn.Open '打开数据库连接
rs.ActiveConnection = conn '设置记录的连接属性
rs.Open "select * from lj" '打开记录集
Do While Not rs.EOF '从第一条记录开始查找，直到完成查询
a(i) = rs.Fields(2) '数据放入数组中
List1.AddItem rs.Fields(2) & Space(16) & rs.Fields(3) '数据放入list列表框中
rs.MoveNext
Loop
rs.Close '关闭记录集
conn.Close '关闭数据库的连接
End Sub
数据库：
想得到更多的VB小程序，请关注我，点击下方的广告可以更好的支持和鼓励我哦！
版权声明：
本站文章均来自互联网搜集，如有侵犯您的权益，请联系我们删除，谢谢。
标签： #vb连接access数据库并按日期段查询
