如何将vb6.0连接到access2016
答案:1 悬赏:20 手机版
解决时间 2021-03-23 03:54
- 提问者网友：喧嚣尘世
- 2021-03-22 16:46
如何将vb6.0连接到access2016
最佳答案
- 五星知识达人网友：老鼠爱大米
- 2021-03-22 18:19
在工程里找到部件 在部件里找到Microsoft ADO Control 6.0,勾上，点应用，工具拦上出现一个拉练样的控件为止。把ADO拖放到窗体上，VISIBLE属性设置成不可见。再拖放一个按钮，一个文本框，连接语句这么写：
Private Sub Command1_Click()
Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ACCESS完整路径/ACCESS名;UID=...;PWD=...."
Adodc1.RecordSource="Select * From ACCESS 表"
Adodc1.Refresh
'----------//这就是连接数据库字符串，要引用数据就该这么写
If Not Adodc1.RecordSET.EOF Then
'---------//必须排除数据连接异常，不然查询数据时每次提示响应连接
Text1=Adodc1.RecordSet.Fields("字段名")
'--------让文本框显示查询列第一个记录
End If
End Sub
Private Sub Command1_Click()
Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ACCESS完整路径/ACCESS名;UID=...;PWD=...."
Adodc1.RecordSource="Select * From ACCESS 表"
Adodc1.Refresh
'----------//这就是连接数据库字符串，要引用数据就该这么写
If Not Adodc1.RecordSET.EOF Then
'---------//必须排除数据连接异常，不然查询数据时每次提示响应连接
Text1=Adodc1.RecordSet.Fields("字段名")
'--------让文本框显示查询列第一个记录
End If
End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯