VBA: Option Explicit
Wenn man in Microsoft MS Access oder Excel programmiert, dann sollte man in der obersten Zeile eine kleine Code-Zeile hinzufügen.
Diese kleine Anweisung führt dazu, dass man nach dem Schreiben von vba Visual Basic Code anschliessend beim Kompilieren einen Fehler angezeigt bekommt, wenn ein Fehler in dem Programmier-Code ist.
Beispiel
Hier wird angezeigt, dass das Control ctlBrowser nicht vorhanden ist, mit: Variable nicht definiert
Fehler bei der Kompilierung:
Durch die Anweisung Option Explicit in MS Access wird ein Fehler beim Debuggen->Kompilieren angezeigt
Option Compare Database
Option Explicit
Public Function wait_for_Document(Optional ByVal intSeconds As Integer = 20) As Boolean
'------------< wait_for_Document() >------------
Dim bResult As Boolean
bResult = False
Dim browser As webBrowser
Set browser = ctlBrowser.Object
'--< lade HTML Document >--
Dim hdoc As HTMLDocument
Set hdoc = Nothing
Do Until (Not hdoc Is Nothing)
DoEvents
Set hdoc = browser.Document
Loop
'--</ lade HTML Document >--
|
Ohne die Anweisung Option Explicit wird kein Fehler angezeigt und der Programmiercode erzeugt erst in der Laufzeit einen nicht entdeckten Fehler.
Option Compare Database
Public Function wait_for_Document(Optional ByVal intSeconds As Integer = 20) As Boolean
'------------< wait_for_Document() >------------
Dim bResult As Boolean
bResult = False
Dim browser As webBrowser
Set browser = ctlBrowser.Object
'--< lade HTML Document >--
Dim hdoc As HTMLDocument
Set hdoc = Nothing
Do Until (Not hdoc Is Nothing)
DoEvents
Set hdoc = browser.Document
Loop
'--</ lade HTML Document >--
|
Kompilieren von VBA Code in Visual Basic findet man unter Menü->Debuggen->Kompilieren
|