DataTable按行添加Double数组数据时如何指定列类型为Double

你只需要在执行填充数据的循环之前，提前为DataTable创建对应数量的列，且创建列时明确指定类型为Double即可，具体实现如下：

实现步骤 #

1. 预先初始化Double类型列
   已知你的二维数组有MyCols列，直接循环创建对应数量的Double类型列即可：

' 先清空原有列（如果有不需要的旧列的话）
dt.Columns.Clear()

' 循环创建MyCols个Double类型的列
For j = 0 To MyCols - 1
    ' 可自定义列名，第二个参数固定传入GetType(Double)指定列类型
    dt.Columns.Add($"列{j + 1}", GetType(Double))
Next

如果需要自定义更多列属性（比如是否允许空值、默认值等），也可以用显式创建DataColumn的写法：

dt.Columns.Clear()
For j = 0 To MyCols - 1
    Dim column As New DataColumn()
    column.ColumnName = $"列{j + 1}"
    column.DataType = GetType(Double)
    ' 可额外设置其他列属性，例如：
    ' column.AllowDBNull = False
    dt.Columns.Add(column)
Next

2. 执行原有数据填充逻辑
   列初始化完成后，直接运行你之前写的数组数据填充代码即可，无需额外修改：

Dim workrow As DataRow
For i = 0 To MyRows - 1
    workrow = dt.NewRow()
    For j = 0 To MyCols - 1
        workrow(j) = x(i, j)
    Next
    dt.Rows.Add(workrow)
Next

注意事项 #

• 列类型必须在填充数据之前指定：DataTable存入数据后不允许修改列的数据类型，若已经填充过数据再改列类型会抛出运行时异常。
• 不要依赖自动类型推断：如果未提前创建列直接赋值，DataTable会自动推断列类型，存在推断错误的风险，提前显式指定类型是最稳妥的方案。
• 确保二维数组x(i,j)的元素类型为Double，若存在其他类型的数值，赋值时会自动做类型转换，转换失败也会抛出异常。

内容的提问来源于stack exchange，提问作者user16594857