此示例创建 DataColumn 对象并设置 DataColumn.Expression 属性以计算订单总额(不包括折扣!)。
示例
Private Sub CreateExpressionColumn() Dim OrderTotal As New DataColumn() OrderTotal.ColumnName = "OrderTotal" OrderTotal.DataType = GetType(Double) OrderTotal.Expression = "UnitPrice * Quantity" DsNorthwind1.Order_Details.Columns.Add(OrderTotal) End Sub
编译代码
本示例需要:
- 对 System 和 System.Data 命名空间的引用。
- 名为 DsNorthwind1 的数据集。
- DsNorthwind1 数据集中的 OrderDetails 表。