以下是引用实话实说在2009-3-2 14:32:00的发言：自动插入行实例中xh列(bouble型)如何自动产生编号呢(默认产生)?
[此贴子已经被作者于2009-3-2 14:33:02编辑过]
DataRowAdding
增加一行时执行，此时新增行(DataRow)已经创建，但并未真正增加到DataTable中，通常在此处对新增行进行默认值的设置。
e参数属性：
DataTable：返回增加行的数据表。
DataRow： 返回新增加的行。
示例一
例如希望新增行的日期设为当前系统日期，姓名设为当前登录用户名，可以将DataRowAdding事件的代码设置为：
e.
DataRow("日期") = Date.Today()
e.DataRow("姓名") = User.Name
Compute
根据指定的表达式和条件进行计算，语法：
Compute(Expression, Filter)
Expression: 要计算的表达式
Filter： 可选参数，用于设置计算条件。
Exression和Filter都是表达式，语法和在应用篇中介绍的表达式完全相同，请参考表达式的运算符和函数。
Expression使用聚合函数进行统计
例如，我们要统计订单表中产品PD01的销售金额，代码如下：
Dim
Sum As Double
Sum = Tables("订单").Compute("Sum(数量)", "产品 = 'PD01'")
Output.Show(Sum)
还记得吗？ DataTable也有Compute方法，两者功能一样，但是DataTable的Compute方法统计所有行，而Table的Compute方法只会统计Table中可见的行。
聚合函数
聚合函数用于数据统计，表达式支持下列聚合函数：
Sum：求和
Avg：平均
Min：最小值
Max：最大值
Count：计数
StDev：标准偏差
Var：方差
例如要对当前表的金额列汇总，公式为：
Sum([金额])
[此贴子已经被作者于2009-3-2 15:07:31编辑过]
加好友 
发短信
Post By：2009/3/2 15:05:00 [只看该作者]
