主题：[求助]怎样计算按按钮的次数

Dim tm As String  = ProjectPath & "Attachments\检验报告.doc" '指定模板文件

Dim fl As String = ProjectPath & "Reports\检验报告0329.doc" '指定目标文件

Dim wrt As New WordReport(Tables("表A"),tm,fl) '定义一个WordReport

wrt.Build() '生成报表

wrt.Show() '显示报表

Dim fdr As DataRow = Tables("表A").current.DataRow

If fdr.IsNull("报告编号")=False Then

    fdr("打印次数") = val(fdr("打印次数")) + 1

    e.Form.Controls("Label1").Text = val(fdr("第二列"))

End If

当我只选一个记录打印ＷＯＲＤ报表时，打印次数列可以记录打印次数，但是当我用鼠标选取多行记录打印时，只有用鼠标选取的第一行记录的打印次数列会记录次数，其他行的打印次数列不能记录次数。　请问题能不能解决多行打印时，每一行记录也可以记录次数。