2011-10-19 16 views
8

Microsoft Access ile VBA kullanıyorum.VBA Microsoft Access ile - Nesnenin var olup olmadığını kontrol edin

Bazen var olmayan, bazen mevcut olan bir WebBrowserControl içindeki bir öğeye nesne ayarlıyorum. 'MyDiv' varsa ben istemiyorum eğer

Dim myWebBrowser As Object 
Dim myItemInsideWebpage As Object 

Set myWebBrowser = Me.WebBrowser0.Object 
Set myItemInsideWebpage = myWebBrowser.Document.GetElemendById("myDiv") 

, harika, Erişim beni çok onunla başa çıkabilirim bildirmek için.

cevap

14

öyle olacağını düşünüyoruz şey Sen 'On Error Resume Next' ile 'Set' deyimi önsöz 'myDiv' var olmayan biriyle bir hata atılır durumunda gerekebilir

If myItemInsideWebpage Is Nothing Then 
' doesn't exist 
Else 
' does exist 
End If 

gibi.

+0

Mükemmel teşekkürler. – JMK