[source,vbnet]
----
Public Class FirstClass
    Private Sub UpdateMatrix(matrix As Integer()()) ' Compliant: method is private
        ' ...
    End Sub
End Class

Friend Class SecondClass
    Public Sub UpdateMatrix(matrix As Integer()()) ' Compliant: class is internal
        ' ...
    End Sub
End Class
----