Option Compare Database

Private Sub Command58_Click()

Forms![frmCustomerInvoice]![Total] = DSum("[ItemPrice]", "qryInvoiceItems", "[InvoiceNo] = Forms![frmCustomerInvoice]![InvoiceNo]")

    
End Sub