MSAccess：Abbv扩展 - 最有效的方法？

Question

我有一个Access应用程序，我预先处理一个信息表（自由格式描述），以扩展已知的标准abbreivations。我使用的方法适用于少数几个，甚至几千个记录，但实际上已经低于10,000个记录。

我的abbv标准目前仅包含~100＆＃34; Abbv Term＆＃34;表中的对，随着时间的推移会大大扩展。小样本：

 Abbv   Expansion
 =====  =========
 BN     bone
 BNDG   bandage
 BPSY   biopsy
 BRN    brown

 " The quick BRN fox " would get expanded to " The quick BROWN fox "
 " The fox is BRN " would get expanded to " The fox is BROWN "

 Note: The desc is padded with a leading & trailing space in advance of the 
 Replace function. The result is trimmed at the end of the function.

我目前用于对整个[Data]表执行bump / expand / replace的查询：

 strSQL = "UPDATE Data, AbbvExpansion SET Data.Desc = Replace(Data.[Desc],' ' & AbbvExpansion.[Abbv] & ' ',' ' & AbbvExpansion.[Expansion] & ' ');"
 db.Execute strSQL

我的方法似乎过于单一/粗糙，特别是在规模上。我正在寻找一种更智能的方法来实现这一结果。

有任何改进建议吗？