ACCESS记录的删除和读写
清除空表记录
1,currentdb()的方法。执行\ " delete * from table name \ "
2,docmd.runsql \"SQL语句\"
3,runsql \" delete *。
以下示例显示如何使用
Currentrecord属性来确定所显示的当前记录的记录号。在通用过程Currentformrecord中,当前记录的数值被赋给变量Lngrecordnum。
subcurrentformrecord(frm As Form)
Dim lngrecordnum As Long
lngrecordnum = frm。CurrentRecord \ Current record是当前记录号
End Sub
dlast(\ "字段名\ ",\ "表名\")
读取的最后一条记录在字段的默认值中使用该函数可以使该字段的新记录显示该字段的前一条记录的值
。
DoCmd。OpenForm \"formname\ ",acNormal,,\"ID =\" & LNGBH,acFormEdit, Acownormal
打开窗体时如何自动转到相应的记录
用法:docmd.run命令accmdrecordsgotonw
accmdrecordsgotofirst移到第一条记录
AcCmdRecordsGoToLast移到最后一条记录
acCmdRecordsGoToNew添加新记录
acCmdRecordsGoToNext移到下一条记录
accmdrecordsgotopioprevious移到上一条记录的位置 最后一条记录
me . recordset . absolute position =-1 '在第一条记录之前,me . recordset . BOF = true
me . recordset . absolute position = me . recordset . record count \在最后一条记录之后,me . recordset . eof = true
me . recordset . absolute position = n \第n+1条记录
确定它是否是新记录
me . new record = true
me . new record = false
VB语句删除
0条评论