欢迎来到天天文库
浏览记录
ID:47433699
大小:271.24 KB
页数:7页
时间:2020-01-11
《vb连接access数据库及数据读写操作》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、ACCESS数据库和VB的连接EditedbyRyan20131、建立Access数据库2、启动VB,建立标准EXE图13、添加ActiveX控件鼠标指向任意VB控件,单击右键,选择“部件(O)”,出现图3所示界面图2图3选择部件“MicrosoftADODataControl6.0(OLEDB)”,出现如图4所示控件图44、添加控件Adodc图51、在控件Adodc上添加数据源鼠标指向控件Adodc1,单击右键,选择“ADODC属性”,弹出如图7所示界面图6图7单击“生成(U)...”,弹出如图8所示界面图8选择“MicrosoftJet4.0OLEDBProvider”,单击“下一步(N)
2、>>”,弹出如图9所示界面图9单击“...”,添加数据源(第一步所建Access数据库),如图10所示图10单击“测试连接(T)”,出现提示框,如图11所示图11之后点击“确定”,退回到如图12所示界面图12单击“记录源”,弹出如图13所示界面图13在“命令类型”下,选择“1-adCmdText”,在“命令文本(SQL)”下,输入“Select*fromtest1”,最后单击“应用”,“确定”即可之后,进入程序书写部分程序部分需要注意接头形式及简单例子如下:PrivateSubCommand1_Click()‘VB按钮控件DimmydbAsNewADODB.Connection‘定义新的数据库
3、连接mydb.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=D:readdatabasetest1test1.mdb"‘数据库绝对路径DimrsAsNewADODB.Recordset‘定义数据库的一个对象mydb.Open‘打开数据库rs.Open"select*fromtest1",mydb,3,3‘打开数据库中的表test1Fori=1To1!For循环控制选择哪一行rs.MoveNextNextiMe.Text1.Text=rs.Fields(1).Value‘读取指定行中的哪个数据给文本框rs.Upd
4、ate‘数据显示rs.Close‘关闭表EndSub
此文档下载收益归作者所有