接着上个问题继续问窗体当前行的问题

dsum("阁下要合计的字段名称","阁下的数据表或查询名称","阁下作为计算条件的字段名称>=" & me.texta.value & " and 阁下作为计算条件的字段名称<=" & me.textb.value)

遍历计算，则如下：

dim i as long
dim s as long
s=0
for i=me.textb.value to me.texta.value
   me.子窗体.form.seltop=i
   s=s+me.子窗体.form.controls("需要合计的控件名称").value
next