怎么對比同一窗體中的數(shù)據(jù)，找出不同的數(shù)據(jù)來

lqp971

最近想做一個數(shù)據(jù)管理的東西，思路是將同一類型的數(shù)據(jù)先查詢出來，然后在不同的子窗體內(nèi)進(jìn)行對比。
搜了很久，沒結(jié)果，各位老大，能否指教一二？
詳細(xì)見附件。

kangking

Private Sub Command4_Click()
    Dim rsS As Recordset
    Dim rsO As Recordset
    Dim isFind As Boolean

    On Error Resume Next
    Set rsS = Me.FBSUB.Form.RecordsetClone
    Set rsO = Me.FBLSUB.Form.RecordsetClone
    rsS.MoveFirst

    Do Until rsS.EOF
        isFind = False
        rsO.MoveFirst
        If Not IsNull(rsS("SN")) Then
            rsO.FindFirst "SN ='" & rsS("SN") & "'"
            If rsO.NoMatch Then
                MsgBox rsS("SN") & " No Match"
            End If
        Else
            MsgBox "SN is null"
        End If
        rsS.Move 1
    Loop

    Set rsS = Nothing
    Set rsO = Nothing
End Sub

春秋

看了，不是很明白您的意思。一般講，訂單號是唯一的，而SN也應(yīng)該是唯一的。也就是說，訂單號不同而SN相同是一種錯誤。如果情況確如描述，則應(yīng)該在輸入有效性中加以限定，不必反過來進(jìn)行檢查。像現(xiàn)在這樣的設(shè)計(jì)思路，既增加了難度，又不符合要求。試想，如果數(shù)據(jù)很龐大，執(zhí)行一次比較將是多么耗時。

lqp971

春秋 發(fā)表于 2012-4-2 06:52
看了，不是很明白您的意思。一般講，訂單號是唯一的，而SN也應(yīng)該是唯一的。也就是說，訂單號不同而SN相同是 ...

附件中只是一個例子而已，我的數(shù)據(jù)全部是從EXCELL導(dǎo)入的，前面一個表是東西送出去維修，后面一個表是從vendor那里返回的東西，vendor有可能因?yàn)槟承┰�因給換掉，所以我就是要找出哪些被換掉了。
在excel中很容易（Vlookup），ACCESS就不會了。

lqp971

kangking 發(fā)表于 2012-4-2 09:44
Private Sub Command4_Click()
    Dim rsS As Recordset
    Dim rsO As Recordset

KangKing 大哥，你懂我……
有效果了……
如果能弄個表把這些不同的數(shù)據(jù)給保存起來就更好了
或者能在子窗體LBSUB中用顏色把不同的SN給顯示出來最好了！