conn.Execute str返回到是rs结果集addstr = "select * from book1 "
rs.Open str, conn, adOpenDynamic, adLockPessimistic
conn.Execute str
rs.AddNew
rs("id") = id
rs("name") = name
rs.Updateupdatestr = "update book1 set name='" & Text2.Text & "'where id= '" & idh & "'"
rs.Open str, conn, adOpenDynamic, adLockPessimistic
conn.Execute strdelstr = "Delete from book11 where id ='" & Label8.Caption & "'"
rs.Open str, conn, adOpenDynamic, adLockPessimistic
conn.Execute str
(1)数据记录筛选：
sql="select*from数据表where字段名=字段值orderby字段名[desc]"
sql="select*from数据表where字段名like'%字段值%'orderby字段名[desc]"
sql="selecttop10*from数据表where字段名orderby字段名[desc]"
sql="select*from数据表where字段名in('值1','值2','值3')"
sql="select*from数据表where字段名between值1and值2"
(2)更新数据记录：
sql="update数据表set字段名=字段值where条件表达式"
sql="update数据表set字段1=值1,字段2=值2……字段n=值nwhere条件表达式"
(3)删除数据记录：
sql="deletefrom数据表where条件表达式"
sql="deletefrom数据表"(将数据表所有记录删除)
(4)添加数据记录：
sql="insertinto数据表(字段1,字段2,字段3…)values(值1,值2,值3…)"
sql="insertinto目标数据表select*from源数据表"(把源数据表的记录添加到目标数据表)
(5)数据记录统计函数：
AVG(字段名)得出一个表格栏平均值
COUNT(*|字段名)对数据行数的统计或对某一栏有值的数据行数统计
MAX(字段名)取得一个表格栏最大的值
MIN(字段名)取得一个表格栏最小的值
SUM(字段名)把数据栏的值相加
引用以上函数的方法：
sql="selectsum(字段名)as别名from数据表where条件表达式"
setrs=conn.excute(sql)
用rs("别名")获取统的计值，其它函数运用同上。
(6)数据表的建立和删除：
CREATETABLE数据表名称(字段1类型1(长度),字段2类型2(长度)……)
例：CREATETABLEtab01 (namevarchar (50), datetimedefaultnow ())
DROPTABLE数据表名称(永久性删除一个数据表)
VB实现ACCESS数据库记录的查询,新增,删除,修改的代码是什么?
“修改”按钮的程序 \\x0d\\x0aPrivate Sub cmdEdit_Click() \\x0d\\x0asql = "select * from 停时统计 where date = cdate('" & Text8.Text & "') and ycqk = '" & Combo1.Text & "'and id = '" & DataGrid1.Columns(2).CellText(DataGrid1.Bookmark) & "'" \\x0d\\x0a...
...一个应用程序,能对Access数据库文件中的数据进行增、删、改和查询...
删除：docmd.RunSQL "delete from dehz"增加：docmd.RunSQL "INSERT INTO lsde (图号, 组件号, ) SELECT [zqd]![图号] AS 表达式1, 定额.组件号, FROM zqd INNER JOIN 定额 ON zqd.组件号 = 定额.组件号 WHERE ((([定额]![组件号])=[zqd]![组件号])) ORDER BY [zqd]