诚心求教：datacolumn对象数据类型声明代码错误 - 编程论坛

冰镇柠檬汁儿2010-12-13 21:08

Private Sub MakeTable()
    ' Create a DataTable.
    Dim table As DataTable = new DataTable("Product")

    ' Create a DataColumn and set various properties.
    Dim column As DataColumn = New DataColumn
    column.DataType = System.Type.GetType("System.Decimal")
    column.AllowDBNull = False
    column.Caption = "Price"
    column.ColumnName = "Price"
    column.DefaultValue = 25

    ' Add the column to the table.
    table.Columns.Add(column)

    ' Add 10 rows and set values.
    Dim row As DataRow
    Dim i As Integer
    For i = 0 to 9
        row = table.NewRow()
        row("Price") = i + 1

        ' Be sure to add the new row to
        ' the DataRowCollection.
        table.Rows.Add(row)
    Next i
End Sub

这段代码希望对你有用，仔细看看，你应该能明白的，呵呵