供货商=DLookup("公司名称", "供货商资料", "[供货商编号]= '" & Me![供货商编号] & "'")10、设置字段的默认值为当前表的最后一条记录的值（或序号加1）    在窗体的成为当前事件中，用Dlast函数查找最后记录相关值并辅值给字段的默认值：     成绩.DefaultValue = "'" & DLast("成绩", Me.RecordSource) & "'"11、删除重复记录（字段）    表中要有自动编号字段(ID)，可建立删除查询或执行RunSql语句（其中[  ]填写对应的表名、重复字段名、关键字段名）：    Delete * FROM [表] Where DCount("[字段]","[表]","[字段]='" & [字段] & "'")>1 AND [ID]>DLookUp("[ID]","[表]","[字段]='" & [字段] & "'") or [字段] Is Null;12、班级成绩排名查询    可根据年级、班级和不同科目替换查询中的相应字段名：    Select *, [英语]+[数学]+[语文] AS 总分, DCount("*","成绩表","[年级]='" & [年级] & "' and ([英语]+[数学]+[语文])>" & [英语]+[数学]+[语文])+1 AS 年级名次 FROM 成绩表 orDER BY 成绩表.年级, [英语]+[数学]+[语文] DESC;13、防止公式文本框引起窗体抖动    如果窗体中使用了计算公式作为文本框的数据源，这可能会导致窗体一打开或者移动鼠标等引起窗体刷新时，窗体不停的抖动，这可在窗体的加载事件中加入：    Me.Recalc14、查找与该控件匹配的记录    如何使窗体转到组合框或文本框中输入的指定记录，用组合框的向导中可以自动生成语句，也可在控件的更新后事件中使用下面一句语句：    Me.Recordset.FindFirst "[ID] = " & Str(Nz(Me![Combo1], 0))