Question

我在Access 2013中有一个带有组合框CountryCode和CityCode的子表单。

我在子表单中添加了另一个字段，这是一个文本框，用于显示与国家/地区代码和输入的城市代码对应的城市名称。

表位置包含以下列：CountryCode | CityCode | CITYNAME

SQL查询应该是：

SELECT CityName FROM Location WHERE CountryCode='USA' AND CityCode='NY'

用户在组合框中选择了“USA”和“NY”，生成的CityName应该进入CityName文本框

到目前为止，我已经完成了：

在子窗体中，在CityName文本框Control Source中，我输入了：

=[GetCityName()]

然后在vba模块中我做了：

Public Function GetCityName()
x = DLookup("[CityName]", "dbo_Location", "[CountryCode] = " & CountryCode & " And [CityCode] = " & CityCode & "")
End Function

当我运行它时会弹出Enter Macro Name对话框。

好吧，可能是因为我没有从组合框中获取代码所以我将x更改为：

x = DLookup("[CityName]", "dbo_Location", "[CountryCode] = " & Me.CountryCode & " And [CityCode] = " & Me.CityCode & "")

现在我收到错误：“使用单词Me的用法无效”

我注意到子窗体未在vba中的Microsoft Access类对象下列出。这可能是个问题吗？

不知道还能做什么，因为你可以看到我对访问和vba很新。请帮忙！

Answer 1

试试这个：

x = DLookup("[CityName]", "dbo_Location", "[CountryCode] = '" & Me.CountryCode.Value & "' And [CityCode] = '" & Me.CityCode.Value & "'")

Access 2013：在文本框中显示查询结果

1 个答案: