[source,vbnet,diff-id=1,diff-type=noncompliant]
----
Interface IBankAccount
    Sub AddMoney(money As Integer)
End Interface

Class BankAccount
    Implements IBankAccount

    Private Sub AddMoney(amount As Integer) ' Noncompliant: parameter's name differs from base
        ' ...
    End Sub
End Class
----