Microsoft KB Archive/103432

From BetaArchive Wiki
< Microsoft KB Archive
Revision as of 08:28, 20 July 2020 by X010 (talk | contribs) (Text replacement - """ to """)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Knowledge Base


Article ID: 103432

Article Last Modified on 1/18/2007



APPLIES TO

  • Microsoft Access 1.0 Standard Edition
  • Microsoft Access 1.1 Standard Edition
  • Microsoft Access 2.0 Standard Edition
  • Microsoft Access 95 Standard Edition
  • Microsoft Access 97 Standard Edition



This article was previously published under Q103432

Moderate: Requires basic macro, coding, and interoperability skills.

SYMPTOMS

A user-defined function may return one of these error messages:

Invalid Use of Null!

-or-


  1. Error

CAUSE

If a field's data type is explicitly defined as any type other than Variant, Microsoft Access is unable to compare the variable to a Null.

RESOLUTION

Define the variable as a Variant, which includes the Date/Time, Floating- point Number, and String data types.

MORE INFORMATION

This article assumes that you are familiar with Visual Basic for Applications and with creating Microsoft Access applications using the programming tools provided with Microsoft Access. For more information about Visual Basic for Applications, please refer to your version of the "Building Applications with Microsoft Access" manual.

NOTE: Visual Basic for Applications is called Access Basic in Microsoft Access versions 1.x and 2.0. For more information about Access Basic, please refer to the "Introduction to Programming" manual in Microsoft Access version 1.x or the "Building Applications" manual in Microsoft Access version 2.0

If you use the following function to evaluate a field that may return a Null value, the function will return the error "Invalid Use of Null!" or "#Error" if the field is null:

   Function IsFieldNull (MyValue As String)
      If IsNull(MyValue) Then
         IsFieldNull = "The field is null!"
      Else
         IsFieldNull = "The field is not null!"
      End If
   End Function
                

To prevent the error "Invalid Use of Null!" or "#Error" when the field is null, define the variable, MyValue, in the custom IsFieldNull() function as a Variant, as follows:

   Function IsFieldNull (MyValue As Variant)
      If IsNull(MyValue) Then
         IsFieldNull = "The field is null!"
      Else
         IsFieldNull = "The field is not null!"
      End If
   End Function
                


Additional query words: pounderror

Keywords: kberrmsg kbprb kbprogramming KB103432