看看下面的VB数据库data控件好像是basename属性出错

来源：百度知道编辑：UC知道时间：2024/06/22 20:21:27

Private Sub comadd_Click()
If comadd.Caption = "确定" Then
On Error GoTo errorhandler
Data1.UpdateRecord
Data1.Recordset.MoveLast
comprev.Enabled = True
comnext.Enabled = True
comdel.Enabled = True
comfind.Enabled = True
comadd.Caption = "添加"
Else
Data1.Recordset.AddNew
comadd.Caption = "确定"
comprev.enable = False
comnext.Enabled = False
comdel.Enabled = False
comfind.Enabled = False
End If
Exit Sub
errorhandler:
If Err.Number = 524 Then
MsgBox "该记录已存在!", 48, "警告"
End If
Resume
End Sub

Private Sub comdel_Click()
Dim i As Integer
i = MsgBox("真的要删除当前记录吗?", 52, "警告")
If i = 6 Then
Data1.Recordset.Delete
Data1.Refresh
End If
End Sub

Private Sub comfind_Click()
If textfind = "" Then
MsgBox "请输入查询内容!", 48, "提示"<

1.应该使用DatabaseName这个属性
2.用data控件必须使用access97格式，所以要在access里将目标文件保存成97格式，或者用vb自带的“可视化数据管理器”进行创建access文件。
3.个人意见：不推荐使用data控件，也不推荐使用控件，比较喜欢代码。

vb的DATA控件怎么样连接到SQL数据库上？ ★★★vb的data控件连接access数据库的搜索问题★★★ 关于VB使用DATA连接access数据库验证用户和密码的问题在vb中，如何将data控件关联的数据库信息读入数组？帮我看看下面的vb问题 VB高手帮帮忙,看看下面的代码 VB中用data连接access数据库,查询怎么做 VB 用 Data 控件操作数据库有什么缺点吗？网站的数据库DATA.ASP问题我用VB的DATA连接数据库，可是打包后再安装时要是败改了安装路径就连一不到数据库了，怎样解决呢？