Question

I’m working on an application in vb6 that draws information from a database. I’ve come across many problems that come from null values in the database as vb6 functions and subroutines don’t like nulls. The string problem is easily solved by concatenating an empty string to the value. But what do I do for a null value where a boolean should be?

Thanks for your help!

Answer 1

This assumes you are using the ADO objects for data access.

Dim boolField As Boolean
If Not IsNull(fields("FieldName").value) Then
    boolField = CBool(fields("FieldName").value)
End If