if objreference = nothing then.../ERROR?

[ultra2]

If Toolbar1.ImageList = Nothing Then \ERROR invalid use of object
Set Toolbar1.ImageList = ImageList1
End If

plz help