ADODB.Command&Null - VB

Формулировка задачи:

MSSQL Server 2000SP4, VB6.0SP6, ADO2.8SP1
Set MyParam = MyCommand.CreateParameter("@IDEmploy", adVariant, adParamInput, , Null)
Set MyParam = MyCommand.CreateParameter("@EndDate", adVarChar, adParamInput, 8, Null)
потом когда запускаю команду (это хп) в профайлере в первом случае ловлю -1, а во втором Null, как положено...
почему -1 ?!?!????

Решение задачи: «ADODB.Command&Null»

textual
                            Листинг программы 
                        
                            <font color="blue">if</font> MyVar = (не пусто, т.е ее надо передать в ХП)