如何检测对象!

[bmhhkyd]

dim objListItem as ListItem
请问如何判断 objListItem 被初试化即: set objListItem=Item
希望通过一个涵数来检测.

[xpmao]

function isInit(byval obj as object)
if obj=nothing then isInit = true
end function

[bmhhkyd]

在有没有其他方法