代码之家 › 专栏 › 技术社区 › Icode4food

Tempvars和access 2003

access-vba ms-access-2007 vba ms-access

0

Icode4food · 技术社区 · 15 年前

我有一个数据库,用于2003年和2007年的混合环境。我有一些使用2007新TempVars特性的小功能。如果是2003年的用户,没有这些特性对他们来说不是问题。

如何编写代码以便在access2003上编译和运行。我试过了 on error resume next

2 回复 | 直到 15 年前

1

HansUp 15 年前

如果您的应用程序将与access2003一起使用,在我看来您应该排除2003不支持的功能。

Option Compare Database
Option Explicit
#Const Aversion = "2007" 'conditional compiler constant '

Public Sub HelloWorld()
    Dim strWho As String
    strWho = "World"

    #If Aversion = "2007" Then
        '* your 2007 feature code here *'
        strWho = UCase(strWho)
    #End If
    'Aversion 2003 -> Hello World '
    'Aversion 2007 -> Hello WORLD '
    Debug.Print "Hello " & strWho
End Sub

有关的详细信息,请查看Access的帮助 #常数 和 #如果

我还没测试过这个,但我觉得它可以用。您可能需要数据库的两个副本:YourDb2003.mdb;以及YourDb2007.mdb。在YourDb2003.mdb中使用“2003”作为编译器常量,在YourDb2007.mdb中使用“2007”。

2

0

iDevlop 12 年前

这是一个 nice summary
#If VBA7 Then 可以帮助您区分仅限Office 2010的代码。不幸的是,它不适用于Office2007。