FUNÇÃO DE CONVERSÃO DE CONTEÚDO - ISOBJECT

IsObject

    Função empregada para indicar se uma variável declarada como As Variant, já foi inicializada, contendo um ponteiro para um objeto válido no sistema, utilizando esta sintaxe:

As seguintes considerações são válidas para a função IsObject:

• IsObject deve ser utilizada apenas para variáveis declaradas como As Variant, retornando Tru (verdadeiro) se NomeDaVariável se referenciar a uma variável cujo subtipo seja vbObject;
• Uma variável Variant possui vbObject se ela contiver um ponteiro válido para um objeto, ou se contiver o valor Nothing (obtido após a referência ao objeto ter sido termminada);
• IsObject retorna True mesmo para variáveis que possuam o valor Nothing.

Exemplo:

Dim objObjeto as Object 

Dim varObjeto as Variant

Dim bolResultado as Boolean

bolResultado = IsObject(varObjeto)  ‘Retorna False
Set varObjeto = objObject
bolResultado = IsObject(varObjeto)  ‘Retorna True
Set varObjeto = Nothing
bolResultado = IsObject(varObjeto)  ‘Retorna True

Até a Próxima!!