VB实现ACCESS数据库记录的查询,新增,删除,修改

数据是用adodc加DataGrid连接ACCESS数据库,想在窗体中实现新增,查询,修改,保存,删除按钮,不知道些具体的代码有类似代码和程序的告诉我下... 数据是用adodc加DataGrid连接ACCESS数据库,想在窗体中实现新增,查询,修改,保存,删除按钮,不知道些具体的代码 有类似代码和程序的告诉我下 展开
 我来答
zhbihemei007
2012-03-02
知道答主
回答量:48
采纳率:0%
帮助的人:25.9万
展开全部
Dim c
If Adodc1.Recordset.RecordCount > 0 Then
c = MsgBox("确认要删除该信息吗?", 17, "设备台帐管理系统")
If c = vbOK Then
Adodc1.Recordset.Delete
Adodc1.Recordset.Update
Adodc1.RecordSource = "select * from sheet4"
DataGrid1.Refresh
End If
Else

MsgBox "数据库中的信息为空,没有可删除的信息", 64, "设备台帐管理系统"
End If
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
syx54
2012-02-27 · TA获得超过7378个赞
知道大有可为答主
回答量:6567
采纳率:83%
帮助的人:2690万
展开全部
你可以参考我的一个回答,把其中的Data控件改为adodc控件就可以了:
http://zhidao.baidu.com/question/378404683.html?oldq=1
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
健美先生2011
2012-02-28
知道答主
回答量:5
采纳率:0%
帮助的人:6万
展开全部
这个问题太笼统了,去看书学学吧
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式