1

我在 MS Access 中有以下表“已替换”。

ID  PartNumber  ReplacedNumber  Status
4   b                       Active
5   c           b           Replaced
6   d           b           Replaced
7   e           c           Replaced
8   h           d           Replaced
9   104308          408077-0102 Replaced
10  310224          408077-0102 Replaced
11  0R5888          408077-0102 Replaced
12  4N6515          408077-0102 Replaced
13  4N6860          408077-0102 Replaced
14  408077-0102 408077-5102 Replaced
15  408077-5102 408077-5102S    Replaced
16  408077-5102S                Active

查询要求

任何这些数字（104308、310224、0R5888、4N6515、4N6860、408077-0102、408077-5102、408077-5102S）的最终答案应该是 408077-5102S，因为这个数字已经取代了所有其他数字。因此，如果我的查询有一个条件，[请输入零件编号以查找最新编号]，则结果编号应为 408077-5102S。因为，它是唯一的活跃号码，并取代了所有其他号码。

同样，这些数字（b、c、d、e、h）中的任何一个的最终答案都应该是 b，因为这个数字已经取代了所有其他数字。因此，如果我的查询有一个条件，[请输入零件编号以查找最新编号]，则结果编号应为 b。因为，它是唯一的活跃号码，并取代了所有其他号码。

有任何想法吗？我还查看了在 SQL (Microsoft Access) 中替换值，但它没有帮助。

4

1 回答 1

0

我认为在 SQL (Microsoft Access) 中替换值中的函数 searchReplaced正是您所需要的，为什么您说它没有帮助？

Sub Test()
  Dim partToSearch, partReplace

  partToSearch = InputBox( "Part to Search? ")
  partReplace = searchReplaced( partToSearch )

  If partToSearch = partReplace Then
    MsgBox "Part " & partToSearch & " Active"
  Else
    MsgBox "Part " & partToSearch & " Replaced by " & partReplace
  End If
End Sub

状态列是否已经存在，或者您是否必须填充它？

于 2012-10-22T16:20:25.993 回答