传入 NULL 整数？

Question

我有一个函数，它接受多个参数。然后它会执行数据库插入。

我在其中一个字段 (modelID) 上有一个外键，

如果没有选择模型 ID，我想传递 NULL。

我尝试了以下操作：

 Dim model As Nullable(Of Integer)
        If ddlModel.SelectedValue = "Other" Then
            'add new model
            model = cSource.InsertModel(txtModel.Text, ddlManuf.SelectedValue)
        ElseIf ddlModel.SelectedValue = "0" Then
            model = Nothing
        Else
            model = ddlModel.SelectedValue
        End If

但现在我收到一条错误消息：可为 Null 的对象必须有一个值。

我该如何解决这个问题？如果我传入 0，它不会插入，因为它破坏了数据库约束:(

Answer 1

使用“模型= DBNull.Value”

Answer 2

请改为：

model.Value = Nothing

并让我们知道错误是否仍然发生？

同样，当您有空日期时，您可以将 DBNull.Value 传递给数据库。

Answer 3

以下工作有效：

 Dim model As Integer
        If ddlModel.SelectedValue = "Other" Then
            'add new model
            model = cSource.InsertModel(txtModel.Text, ddlManuf.SelectedValue)
        ElseIf ddlModel.SelectedValue = "0" Then
            model = Nothing
        Else
            model = ddlModel.SelectedValue
        End If

然后，我在向存储过程添加参数时检查是否为 0，如果为 0，则将 DBnull 分配给它。