水晶報表~判斷數量,標示:已未銷完

引用來源
---

1.
報表內寫一個公式

if 未銷數=0 then
formula="已銷完"+{備註}
else
formula="未銷完"+{備註}
end if

再把這個公式取代備註

2.
Dim dr1 As DataRow
For Each row1 In Me.Ds.sale
if dr1("未結數量")=0 then
dr1("備註")="已銷完"
else
dr1("備註")="未銷完"
end if
Next