需要更好的方法，然后在MS Access中使用if语句

Question

现在我正在研究一个新的数据库，它将显示人们请求的其中一个手册的更改。我有两张桌子和一张表格。第一个表是所有的信息将从手册的参考或子章节，该子章节中的当前文本以及建议的更改中存储。第二个表格用于分章节引用，其中包含三个字段：ID，SubChapter和备注字段，以及子章节所述内容。现在我正在使用组合框作为章节参考，并根据参考使用另一个字段中的当前文本填充另一个字段。这是我的if语句，以获得更好的主意：

If code_ref = "82.101(c)" Then 
current_code = "Other County Regulations" 
proposed_code.SetFocus 
End If 

我想要做的就是把这些千if语句到查找到，它检查的参考，然后插入在下一字段中的正确的文本。我无法在完成if语句的情况下尝试找到一种方法来执行此操作。我想在改变时做到这一点，以便他们可以在参考文献中循环找到他们正在寻找的内容。有什么建议么？

取自我的意见： 想法如何工作将是他们打开表格填写他们的名字，它所属的项目，使用组合框选择代码引用，一旦他们选择代码引用当前代码字段框将被填写，并且它将把焦点集中在所提议的代码字段上，以便他们可以进行更改。

Answer 1

是表中提供的参考，如果没有，你可以建立这样一个表：

code_ref  current_code 
82.101(c) Other County Regulations 

有了这样一个表格，你应该能够创建一个查询，可以用来显示current_code wh选中code_ref。

编辑点评重

您可以创建一个从两个表中选择数据的查询，然后使用向导添加一个组合框通过记录导航。如果您具有唯一键，则记录集可能是可编辑的。

您可以设置一个可用于使用DLookup相关的表的组合框：

Me.txtTextBox = DLookUp("FieldYouWantToReturn","TableNameHere","current_code='" _ 
    & Me.cboCombobox & "'" 

的方式使用DLookup（简述）是：

DLookUp("FieldYouWantToReturn","TableNameHere","NameOfTextFieldInTable='" _ 
     & Me.ControlOrValueToCompare & "'" 

我是简写当前形式
请注意，该控件在引号之外
如果要比较一个数字，则不需要引号
如果您使用w蚂蚁来比较一个日期，你需要散列标记＃yyyy/mm/dd＃

你可能能够使用一个子窗体，与current_code的链接字段。

这些只是一些想法，它不是很清楚你想让用户能够做什么。

Answer 2

您需要查找基于表格。从您的描述中我不确定这是否需要第三张表格或第二张表格中的其他字段。

http://www.trigonblue.com/AccessLookup.htm
http://www.fabalou.com/Access/General/lookup_tables_lut.asp

不要使用 “查找字段”：
http://www.mvps.org/access/lookupfields.htm