Vb.net Convert Integer DBNULL to 0 - error

Question

I'm having this method:

Private Function convertInteger(intInteger As Object) As Integer

    If IsDBNull(intInteger) Then
        convertInteger = 0
    Else
        convertInteger = cInt(intInteger)
    End If

End Function

But it returns this error:

operator '=' is not defined for type 'integer' and type 'dbnull'

Im trying to convert a DBnull value to 0..

But the problem is that the value im trying to convert is not always DBnull.. so how should i handle this?

Why don't you use a `Nullable(Of Int32)`? It has a `HasValue`. property. — Tim Schmelter, Sep 17 '12 at 11:00
**Enable `Option Strict` in the project settings.** Then fix the compile errors. Then come back here. — Konrad Rudolph, Sep 17 '12 at 11:08

codingbiz · Accepted Answer · 2012-09-17T11:11:16.407

3

Try this

Private Function convertInteger(intInteger As Object) As Integer

    If intInteger = DBNull.Value Then
        Return 0
    End If

    Return intInteger

End Function

As suggested by [Tim Schmelter], look into Nullable types

edited Sep 17 '12 at 11:11

answered Sep 17 '12 at 11:01

codingbiz

26,179
8
59
96

2

Please don't suggest the old VB syntax `methodName=returnValue`, that works only for compatibility reasons. VB.NET works the same as C#, it has a return value: `return 0`. – Tim Schmelter Sep 17 '12 at 11:07
1

Am sorry for that. I didn't even see the function name – codingbiz Sep 17 '12 at 11:12

score 1 · Answer 2 · edited Apr 26 '16 at 13:04

1

Try this

Private Function convertInteger(ByVal intInteger As Object) as Integer
   If IsDBNull(intInteger) Then
       Return 0
   Else
       Return CInt(intInteger)
   End if
End Function

edited Apr 26 '16 at 13:04

Breeze

2,010
2
32
43

answered Mar 30 '15 at 10:27

ahmed

11
1

score 1 · Answer 3 · edited Oct 08 '19 at 22:33

1

Private Sub readValue()
    Dim cSql As String
    Dim oCnn as OleDbConnection
    Dim oCmd as OleDbCommand
    Dim oDataReader as OleDbDataReader
    Dim valor as Integer

    oCnn.open()

    cSql = "SELECT FIELD_NAME FROM TABLE"
    oCmd = New OleDbCommand(cSql, oCnn)
    oReader = oCmd.executeReader

    if oReader.HasRows then
       oReader.read()
       valor = IIf(IsDBNull(oDataReader("FIELD_NAME")), 0, oDataReader("FIELD_NAME"))
    End If
End Sub

edited Oct 08 '19 at 22:33

Hadi GhahremanNezhad

2,377
5
29
58

answered Oct 08 '19 at 19:44

dalejandro005

11
1

Edit post to add proper code formatting. Also consider adding any explanation to your code. – Pochmurnik Oct 08 '19 at 20:13

Vb.net Convert Integer DBNULL to 0 - error

3 Answers3