Mas sudah saya masukan code nya tapi kok penjumlahannya masih belum total... ini file nya saya lampirkan lagi . Terima kasih
hy> Coba ubah pada form Table2 Subform:
hy> 1. Hapus event on load
hy> 2. Masukkan prosedur baru di event on current:
hy> If IsNull([no]) Or [no] = 0 Then
hy> Me![Total] = 0
hy> Else
hy> Me![Total] = DSum("[Qty]*[harga]", "Query1", "[no] = " [no])
hy> End If
hy> Ini mungkin bisa membantu.
hy> Hariyanto
Salam
DR.Taufik
mailto:[email protected]

