点击命令按钮，出现“不能将数值指定给此对象”

点击下载此附件

你这里至少有3个地方错误：

1、出现“不能将数值指定给此对象”：

你只限定了文本框类型控件清除数值，连两个计算型的文本框也进行赋值清零，当然出错。要再加上一句判断是否为计算型（公式型）控件。

                If Left(ctl.ControlSource, 1) <> "=" Then '计算型控件不处理
                    ctl.Value = Null
                End If

2、合计出出现名称错误：

你的 Call CheckSubformCount 子程序中赋值的语句给出的子窗体合计文本框的名称给错了，不是

       Me.txt小计合计.ControlSource = "=[产品核算子表查询子窗体].[Form].[txt小计合计]"
应该是：

        Me.txt小计合计.ControlSource = "=[产品核算子表查询子窗体].[Form].[合计]"

3、合计的数量不对

你子窗体的合计文本框的公式是：=Sum([小计])

实际统计的数据是表中的字段[小计]。

要对计算型字段进行统计，可以先建立一个查询生成计算性字段，或者像附件一样，合计文本框的公式改为：=Sum([数量]*[单价]*[结算率])。