How to determine if object has been set

[Ed Lampman]

I know I've seen this here before, but how can I determine if an object has been set or not, to avoid Error 91?

I've tried IsNull, = Nothing, etc but they don't work

I need something like:

(form level code)
Private oMyObject as CMyObject

Private Sub DoSomething()

If oMyObject (doesnt yet exist) Then Set oMyObject = New CMyObject

....

End Sub

[reeset]

Try the IsEmpty command. It returns true if the variable is empty:

Private Sub Command1_Click()
Dim ie As Object
 
If IsEmpty(ie) = True Then
    ie.Visible = True
Else
    MsgBox "called"
    Set ie = CreateObject("InternetExplorer.Application")
    ie.Visible = True
End If
 
End Sub

Hope this helps.

[gaffa]

I've alsways used Is Nothing:

If lobjObject Is Nothing then
    Set lobjObject = new DummyObject
End iF

- gaffa

[Ed Lampman]

Thanks!!