主题：报错

 e.Form.Controls("查询").Visible= True
        e.Form.Controls("起始时间").value = #1/1/2013#
        Dim t As Table = Tables("主界面_销售额统计表")
        t.Fill("select 客户名称,sum(总金额) AS 销售总额 from {销售出库单主表} Group By 客户名称","ERP",True)
        t.DataTable.SysStyles("EmptyArea").BackColor = Color.White
        Dim t1 As Table = Tables("主界面_采购额统计表")
        t1.Fill("select 供应商,sum(总金额) AS 采购总额 from {采购入库单主表} Group By 供应商","ERP",True)
        t1.DataTable.SysStyles("EmptyArea").BackColor = Color.White
        Dim temp As Decimal =Format(t.DataTable.Compute("sum(销售总额)"),"###,###,###,###,###.#####")
        Dim temp1 As Decimal =Format(t1.DataTable.Compute("sum(采购总额)"),"###,###,###,###,###.#####")
        e.Form.Controls("合计销售额").Text ="合计销售额:" & temp & ""
        e.Form.Controls("合计采购额").Text ="合计采购额:" & temp1 & ""
        e.Form.Controls("毛利合计").Text ="毛利合计:" & temp - temp1 & ""
标红的这一句报错，提示如图

 求解。。

此主题相关图片如下：1.jpg