Visual Basic.NET - Ayuda, como hacer para no duplicar el nombre de los productos

Private Sub Check_Duplicado()

    vd = 0 : strSql = ""    .......... vd es un indicador para saber si grabo o no, si es = 0, si mando grabar

    Try

        Using cnx As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & dSn)  '''''' dSn es la ruta de mi access

            cnx.Open()

            strSql = "SELECT * FROM ARTICULOS WHERE DESCRIPCION = '" & txtArticulo.Text & "' "

            Dim cmd As New OleDbCommand(strSql, cnx)

            cmd.CommandType = CommandType.Text

            cmd.Parameters.AddWithValue("CLAVE", txtArticulo.Text)

            Dim rstARTICULOS As OleDbDataReader = cmd.ExecuteReader()

            If rstARTICULOS.Read = True Then

                MsgBox("El Artículo ya Existe", vbOKOnly + vbCritical)

                vd = 1

                Exit Try

            End If

        End Using

    Catch ex As Exception

        MessageBox.Show("Error : " + ex.Message + "", "¡Ocurrio el siguiente Error!", MessageBoxButtons.OK, MessageBoxIcon.Error)

    End Try

    txtArticulo.Focus()

    txtArticulo.Select()

End Sub