如何禁止重复添加记录？

“供应商代码”窗体中，点击“添加记录”按钮，输入“供应商”与“年度”与“代码”三个文本框后，如果添加的供应商与年度二者结合  stemp = "select * from 供应商代码" '从供应商代码表中选出全部与以前记录有重复则报错。如何实现这一功能？这是我在“保存记录”按钮中写的代码，请高手帮忙看一下。
        For i = 1 To rs.RecordCount
       If Me![供应商ID] = rs("供应商ID") Then
          If Me.年度 = rs("年度") Then
            
                MsgBox "记录已存在！"
              
                Exit For
             Else
        rs.MoveNext
          End If
       Else
          rs.MoveNext
       End If
    Next i
    Exit Sub
    Else点击下载此附件