vb怎么删除数据库数据 求汉语解释

rsOpen "select from 表1 where 字段=条件", cn, 1, 3

if rsRecordCount>0 then

rsdelete

rsupdate

end if

rsclsoe

'=============

如果你是要修改内容

rsOpen "select from 表1 where 字段=条件", cn, 1, 3

if rsRecordCount>0 then

rsfields("用户名")=text1text

rsupdate

end if

rsclsoe

'连接数据库，先要用引用ADO组件

dim cnn as new AdodbConnection

cnnopen (这里面属性若干，有数据库路径以及表名称，百度一下即可)

dim sql as string 

'添加数据

sql = "inser into 表 (姓名,学号，所选科目) values('ycc',1795,'信息管理')"

cnnexecute sql

'删除数据

sql = "delete from 表 where 表_id = 123456"

cnnexecute sql

'断开

cnnclose

set cnn=nothing

当然，可以声明一个模块级变量，当用鼠标单击某一个 datagridview 控件的时候，就把该 datagridview 控件名赋予该模块级变量，然后在删除键的事件里，执行删除前，根据该模块级变量里保存的信息，来确定针对某个 datagridview 控件进行删除 *** 作。

不过还是建议你每一个 datagridview 控件 对应使用一个删除按钮。

如果你的adodc1已经连接成功,请注意把datagied1与adodc1连接起来Set DataGrid1DataSource = Adodc1

这样行了吗

Private Sub Command2_Click()

Adodc1RecordSource = "select from nni where 姓名='" & Text1Text & "'" '这是查询 姓名=text1 的内容

Set DataGrid1DataSource = Adodc1

Adodc1Refresh

End Sub

朋友,,,我没有你的数据库,所以不能检测是否成功

还麻烦你运行一下并告诉结果(一切以实践为主)

希望这代码能帮你忙,,,请把分给我吧如果还有什么问题或不明白的地方,请放心大胆问这里好心人多得很,,,,,

如果我能回答,我尽力回答,如果我不能回答,,我非常乐意与你一起研究,学习

'需要控件:command1,command2,adodc1,datagrid1

Private Sub Command1_Click()

Adodc1RecordsetDelete

Adodc1Refresh

End Sub

Private Sub Command2_Click()

Adodc1RecordSource = "select from nni where 姓名='" & Text1Text & "'" '这是查询 姓名=text1 的内容

Set DataGrid1DataSource = Adodc1

Adodc1Refresh

End Sub

Private Sub Form_Load()

Command1Caption = "删除"

Command1Caption = "查询"

End Sub

Worksheets("sale")Range("a" & delaa, "r" & delaa)Delete Shift:=xlUp

这是删除的语句，应该看得懂吧？

可以给这个表建个触发器

create trigger tbl_delete

on tbl1

for delete

as

delete from tbl2 where id in (select id from deleted)

以上就是关于vb怎么删除数据库数据 求汉语解释全部的内容，包括:vb怎么删除数据库数据 求汉语解释、VB中如何向SQL数据库中的表添加和删除数据、vb.net窗口中存在多个datagridview表格，如何删除选中表格的数据及其绑定的数据库中的数据等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！