Dim 金额_大写 As Double = Tables("入库明细").Compute("Sum(含税金额)")e.Form.Controls("金额大写").value = CUMoney(金额_大写)
在文本框的 ValueChanged事件里 ,是这样写吗?