访问2016 - 更新应用程序标题 - 未找到属性

Question

从访问2003升级和应用程序到访问2016

以下代码

CurrentDb.Properties("AppTitle").value = "Test Client"

给我一​​个未找到属性的错误

我该如何解决？

Answer 1

如果要使用用户定义的属性，则必须定义一次：

CurrentDb.Properties.Append CurrentDb.CreateProperty("AppTitle", dbText, "Test Client")

然后你可以像使用它一样使用它