1.新增報表程式碼:funtion ReplaceZero
2.於算運式中套用fuction ReplaceZero
Public Function ReplaceZero(stockCount As Decimal,replaceStr As String) As String
If stockCount = "0" Then
ReplaceZero=replaceStr
Else
ReplaceZero=Format(stockCount, "#,##0.##")
End If
End Function