VB调用存储过程 参数问题

Set parm_jobid4 = New ADODB.Parameter
parm_jobid4.Type = adVarWChar
parm_jobid4.Value = "TK01"
parm_jobid4.Direction = adParamInput
mycommand.Parameters.Append parm_jobid4

一运行就提示：不正常的定义参数对象,提供了不一致或者不完整的信息."


这个参数明明是nvarchar(4)来着,  
怎么就不对呢？

--------------------编程问答-------------------- 还有个 parm_jobid4.name = ? 呢？？

补充：VB ,  基础类