質問

Dim dr As SqlDataReader = cmd.ExecuteReader(CommandBehavior.CloseConnection)
Dim dt As DataTable = New DataTable()
dt.Load(dr)

For Each row As DataRow In dt.Rows

    Dim dob_str As String = ""

    'code to check if row.Field(Of Date)("DOB") is dbnull
    'if not dbnull then dob_str = row.Field(Of Date)("DOB")

Next
.

Dateの各行のDataTable type列が空の場合はチェックしますか?

私は

を試してみました
    If Not row.Field(Of Date)("DOB") = Nothing Then
        dob_str = row.Field(Of Date)("DOB")
    End If
.

    Dim nullCheck As Boolean = IsDBNull(row.Field(Of Date)("DOB"))
    If nullCheck = False Then
        dob_str = row.Field(Of Date)("DOB")
    End If
.

しかしそれらはすべてランタイム中にCannot cast DBNull.Value to type 'System.DateTime'. Please use a nullable type.をもたらしました。

役に立ちましたか?

解決

nullable type

If row.Field(Of Date?)("DOB") IsNot Nothing Then
    dob_str = row.Field(Of Date)("DOB")
End If
.

または

If row.Field(Of Date?)("DOB").HasValue Then
    dob_str = row.Field(Of Date)("DOB")
End If
.

またはIsNull

If Not row.IsNull("DOB") Then
    dob_str = row.Field(Of Date)("DOB")
End If
.

ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top