主题：[求助]初学,有些问题看了帮助还是不会.

1.不会用replacefor:现有一张表(外部),内有数量,单价,金额.如何用replacefor完成数量*单价=金额.

2.有如下代码:

Dim rq As Date = Date.Today
Dim flt As String =  "kpr='" & user.name & "' And ddrq = '" & rq & "'"
Dim cnt As Integer = DataTables("dingdan").Compute("Count([ddrq])",flt)
Dim sum1 As Double = DataTables("dingdan").Compute("sum([je])",flt)
Dim ts1 As WinForm.TextBox = e.Form.Controls("TextBox4")
ts1.Value="当前用户:" & user.name & vbcrlf & "今天完成订单:" & cnt & "份   合计金额:" & sum1

为什么sum1会是4位小数?数量,单价,金额都设为2位的.如果行数多了用Round误差会不会很大?

 第一个，你可以把这张表添加进来（添加外部表），然后就可以像内部表一样使用。

 第二个。sum默认显示的是4位，但统计的时候，是按照7或者15位统计的，误差问题没必要担心。