Friend (Visual Basic)

Článek
09/27/2021
2 min ke čtení

Určuje, že nejmíň jeden deklarovaný programový prvek je přístupný jenom v rámci sestavení, které obsahuje jejich deklaraci.

Poznámky

V mnoha případech požadujete, aby byly programovací prvky, jako jsou třídy a struktury, použity celým sestavením, nikoli pouze komponentou, která je deklaruje. Je však možné, že nechcete, aby byly přístupné pomocí kódu mimo sestavení (například pokud je aplikace proprietární). Chcete-li omezit přístup k prvku tímto způsobem, můžete jej deklarovat pomocí Friend modifikátoru.

Kód v jiných třídách, strukturách a modulech, které jsou zkompilovány do stejného sestavení, mají přístup ke všem Friend prvkům v tomto sestavení.

Friend přístup je často upřednostňovanou úrovní pro programovací prvky aplikace a Friend je výchozí úrovní přístupu rozhraní, modulu, třídy nebo struktury.

Můžete použít Friend pouze na úrovni modulu, rozhraní nebo oboru názvů. Proto kontext deklarace pro Friend prvek musí být zdrojový soubor, obor názvů, rozhraní, modul, třída nebo struktura. nemůže to být procedura.

Poznámka

Můžete použít také modifikátor Protected Friend Access, který zpřístupňuje člena třídy v rámci této třídy, z odvozených tříd a ze stejného sestavení, ve kterém je třída definovaná. Chcete-li omezit přístup ke členovi z jeho třídy a z odvozených tříd ve stejném sestavení, použijte modifikátor privátního chráněného přístupu.

Porovnání Friend a ostatní modifikátory přístupu najdete v tématu úrovně přístupu v Visual Basic.

Poznámka

Můžete určit, že jiné sestavení je sestavení typu Friend, které umožňuje přístup ke všem typům a členům, které jsou označeny jako Friend . Další informace naleznete v tématu Friend Assemblies.

Příklad

Následující třída používá Friend Modifikátor k povolení přístupu k určitým členům jiným programovacím prvkům v rámci stejného sestavení.

Class CustomerInfo

    Private p_CustomerID As Integer

    Public ReadOnly Property CustomerID() As Integer
        Get
            Return p_CustomerID
        End Get
    End Property

    ' Allow friend access to the empty constructor.
    Friend Sub New()

    End Sub

    ' Require that a customer identifier be specified for the public constructor.
    Public Sub New(ByVal customerID As Integer)
        p_CustomerID = customerID
    End Sub

    ' Allow friend programming elements to set the customer identifier.
    Friend Sub SetCustomerID(ByVal customerID As Integer)
        p_CustomerID = customerID
    End Sub
End Class