I have created a section of code to read a type of self created separated values from a file. I wanted to include an optional function of a progress bar. Below is the first line of the function:

Public Function SVImport(strINPUT As String, lvwTARGET As ListView, Optional intNOTIFY As ssvNOTIFYCONSTANTS, Optional ctlPROGRESS As Control) As ssvERRORCONSTANTS

My problem is that if i don't define ctlPROGRESS (the progress bar control) it is set as Nothing, but I have no way of verifying that it is actually Nothing and there isnt a progress bar to use. Code such as the following doesn't work:

If ctlPROGRESS = Nothing then
...

Can anyone help? I Run VB6 SP5

Finite