VB删listbox中纪录的问题

来源:百度知道 编辑:UC知道 时间:2024/05/28 08:34:36
一个listbox控件(list1),二个按钮,一个添加一个删除,绑定了access数据表里的某一项,添加数据成功了,怎么把添加的记录删除?(选中的添加纪录),删除listbox里的同时也要删除数据表里的,删除按钮的代码要怎么写。
顺便看一下我的添加按钮的写的对不对
Private Sub Command2_Click()

List1.AddItem Text1.Text + " " + Text2.Text + " " + Combo1.Text + " " + Combo2.Text + " " + Text3.Text + " " + Text4.Text
Adodc1.Recordset.Save
End Sub
添加数据和List显示数据都没问题,但不知道这样写时,在删除数据时能不能删掉
建一个文本框,一个查询按钮,文本框输入,list里显示相关信息,又如何写代码?
如果回答者有信心完成,可以去另一个问题签个名,二题分都送了,再追加30分
另一个提问http://zhidao.baidu.com/question/85492089.html?quesup1
第二次补充:二楼的那样可以删除listbox里的,但不能删除access数据表里的,能不能帮想想连access表里的也删除

Private Sub Command3_Click()
dim name as string
name="你要删除的行"
List1.RemoveItem List1.ListIndex
Adodc1.recordsoure="select * from 表名 where 字段名='"& name &"'"
Adodc1.refresh
if Adodc1.recordset.recordcount>0 then
adodc1.recordset.delete
endif
End Sub

Private Sub Command3_Click()
List1.RemoveItem List1.ListIndex
Adodc1.Recordset.Save
End Sub

查询用select语句,如果你把数据库的各个字段写出来也许别人会帮你把代码完整写出来吧,因为你没有注明查询的是哪个字段,数据库名和字段名都没有