Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Access-Versionen und die bedingte Kompilierung
zurück: Best Match Suche weiter: Extended Continous Form - Daten waagerecht scrollen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Tutorial Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
JMalberg
Es wird so langsam sinnig ...


Verfasst am:
27. Jun 2012, 10:16
Rufname:
Wohnort: Saarbrücken


Access-Versionen und die bedingte Kompilierung - Access-Versionen und die bedingte Kompilierung

Nach oben
       Version: (keine Angabe möglich)

Oftmals sollen Access-Anwendungen mit verschiedenen Access-Versionen auf unterschiedlichen Betriebssystemen laufen. Dabei sind bereits im Code die jeweiligen Unterschiede zu erkennen und zu programmieren.
Access beitet dazu die bedingte Kompilierung und fixe Systemkonstanten um die Systemumgebung zu erkennen. Alle Konstanten und Befehle der bedingten Kompilierung beginnen jeweils mit einem "#" vor dem Befehlswort.

Konstanten der bedingten Kompilierung:
Code:
Option Compare Database
Option Explicit

' Konstanten für bedingte Kompilierung
'    #Vba4    True    Zeigt an, dass die Entwicklungsumgebung Visual Basic für Applikationen Version 5.0 ist. Access??? bis Access???
'    #Vba5    True    Zeigt an, dass die Entwicklungsumgebung Visual Basic für Applikationen Version 5.0 ist. Access??? bis Access97
'    #Vba6    True    Zeigt an, dass die Entwicklungsumgebung Visual Basic für Applikationen Version 6.0 ist. Access2000 bis Access2010
'    #Vba7    True    Zeigt an, dass die Entwicklungsumgebung Visual Basic für Applikationen Version 7.0 ist. Ab Access2010
'    #Win16   True    Zeigt an, dass es sich um eine 16-Bit-Entwicklungsumgebung handelt.
'    #Win32   True    Zeigt an, dass es sich um eine 32-Bit-Entwicklungsumgebung handelt.
'    #Win64   True    Zeigt an, dass es sich um eine 64-Bit-Entwicklungsumgebung handelt.
'    #Mac     True    Zeigt an, dass die Entwicklungsumgebung Macintosh ist.
' Allgemein:
'    #Const xyz = abc
'
Die Abfrage der Konstanten kann dann wie folgt geschehen:
Code:
Private Sub TestKompilieren()
#If VBA4 Then
    Debug.Print "VBA4"
#End If
#If VBA5 Then
    Debug.Print "VBA5"
#End If
#If VBA6 Then
    Debug.Print "VBA6"
#End If
#If VBA7 Then
    Debug.Print "VBA7"
#End If
#If Win16 Then
    Debug.Print "Win16"
#End If
#If Win32 Then
    Debug.Print "Win32"
#End If
#If Win64 Then
    Debug.Print "Win64"
#End If
End Sub

' oder gerade bei VBA7 in Zusammenhang mit APIs
#If VBA7 Then
Private Declare PtrSafe Function apiCoCreateGuid Lib "OLE32.DLL" Alias "CoCreateGuid" (pGuid As GUID) As Long
#Else
Private Declare Function apiCoCreateGuid Lib "OLE32.DLL" Alias "CoCreateGuid" (pGuid As GUID) As Long
#End If

' oder um Code-Befehle auszuklammern der in bestimmten VBA-Versionen nicht vorhanden ist
    #If VBA7 Then
        .AllowValueListEdits = False
    #End If

_________________
Gruß
Jürgen

Der Unterschied zwischen Theorie und Praxis ist in der Praxis größer als in der Theorie!
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Formulare: Bedingte Formatierung ABC123 1 tomi-w80 407 08. Feb 2008, 11:15
Da Oansa Bedingte Formatierung ABC123
Keine neuen Beiträge Access Formulare: Endlosformular / Textfeld / Kontrollk und bedingte Format. 2 klaus31 597 21. Dez 2007, 08:15
klaus31 Endlosformular / Textfeld / Kontrollk und bedingte Format.
Keine neuen Beiträge Access Formulare: Bedingte Formatierung funktioniert nicht 3 Sebi1982 1238 17. Sep 2007, 19:34
jens05 Bedingte Formatierung funktioniert nicht
Keine neuen Beiträge Access Formulare: Bedingte Formatierung 1 Imo-Parceval 509 14. Sep 2007, 17:03
JörgG Bedingte Formatierung
Keine neuen Beiträge Access Formulare: Bedingte Formatierung in Abhänigkeit vom aktuellen Monat 4 speedy666 504 13. Sep 2007, 10:53
speedy666 Bedingte Formatierung in Abhänigkeit vom aktuellen Monat
Keine neuen Beiträge Access Formulare: Bedingte Formatierung in Access 97 6 HaWo 2529 26. Jul 2007, 22:27
Willi Wipp Bedingte Formatierung in Access 97
Keine neuen Beiträge Access Formulare: Bedingte Formatierung? (anderes Feld als Kriterium) 2 Avathar 2027 12. Jul 2007, 09:48
Avathar Bedingte Formatierung? (anderes Feld als Kriterium)
Keine neuen Beiträge Access Formulare: Bedingte Formatierung bei leerem Feldinhalt 1 sebi1981 709 27. März 2007, 14:00
blicki Bedingte Formatierung bei leerem Feldinhalt
Keine neuen Beiträge Access Formulare: mehr als 3 bedingte Formatierungen 3 tk25693 1015 28. Feb 2007, 19:21
Nouba mehr als 3 bedingte Formatierungen
Keine neuen Beiträge Access Formulare: Endlos - Unterformular bedingte Formatierung geht nicht 2 Tobias1982 1317 23. Feb 2007, 10:03
Gast Endlos - Unterformular bedingte Formatierung geht nicht
Keine neuen Beiträge Access Formulare: bedingte Formatierung 1 thw 607 17. Jan 2007, 12:43
thw bedingte Formatierung
Keine neuen Beiträge Access Formulare: Bedingte Formatierung 3 heinz-wolfgang 903 21. Dez 2006, 12:14
Willi Wipp Bedingte Formatierung
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Project