Используете ли вы хранимые процедуры? Если это так, вы можете установить значение по умолчанию там или установить значение по умолчанию для столбца в базе данных.
Другим способом было бы назначить свойство DefaultValue объекта DataTable.Column
Вы используете свойство DefaultValue объекта DataColumn.
' Set default values. '
With myDataSet.Tables("Orders")
.Columns("Order_Date").DefaultValue = Today
.Columns("Quantity").DefaultValue = 1
. . .
End With
' Add the new row. '
Dim aNewRow As DataRow = myDataSet.Tables("Orders").NewRow
myDataSet.Tables("Orders").Rows.Add(aNewRow)
Вы также можете указывать значения каждый раз, когда добавляете строку:
' Create a new row, set its values and add it. '
Dim aNewRow As DataRow = myDataSet.Tables("Orders").NewRow
With myDataSet.Tables("Orders")
.Columns("Order_Date") = Today
.Columns("Quantity") = 1
. . .
.Rows.Add(aNewRow)
End With