End With
myTable.Columns.Add(myColumn)
dt = System.Type.GetType("System.Int32")
myColumn = New DataColumn("Quantity", dt)
With myColumn
.AllowDBNull = False
myColumn = New DataColumn
myColumn.DataType = System.Type.GetType("System.Decimal")
myColumn.AllowDBNull = False
myColumn.Caption = "Price"
myColumn.ColumnName = "Price"
myColumn.DefaultValue = 25
dt = System.Type.GetType("System.Decimal")
myColumn = New DataColumn("Tax", dt, "Price * .0862")
.AutoIncrement = False
.ReadOnly = True
strExpr = "Price * Quantity"
上一页 [1] [2] [3] 下一页
Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved. 闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)
鄂公网安备 42011102001154号
站长:MinTao ICP备案号:鄂ICP备11006601号-18