Modülde Object.Equals() yöntemi nasıl kullanılır?

Question

Belki de sorunun adı uygun değildir, çünkü bir modüldeki yöntemler gölgelenemez, ancak özünde tekrar beyan eden bir temel üyeye gölge düşürmek ve onu arama fırsatını kaybetmeden gizlemek istiyorum. uygun değer.

Normalde ben Sınıflar için bunu:

<EditorBrowsable(EditorBrowsableState.Never)> 
Public Shadows Function Equals(ByVal obj As Object) As Boolean 
    Return MyBase.Equals(obj) 
End Function 

Ve bu Yapıları için:

<EditorBrowsable(EditorBrowsableState.Never)> 
Public Shadows Function Equals(ByVal obj As Object) As Boolean 
    Return Object.Equals(obj, Me) 
End Function 

Bir modül ile bu davranışı yeniden oluşturmaya çalışırken bulmak sorun, ben doldurmak için kullanması gereken budur Aşağıdaki örnekte bulunan sorgulama argümanı, Me'u kullanamadığımdan, modülün adını veya yapıcısını kullanamıyorum, anlıyorum, ama ne kullanmam gerekiyor?

Module TestModule 

    <EditorBrowsable(EditorBrowsableState.Never)> 
    Public Function Equals(ByVal obj As Object) As Boolean 
     Return Object.Equals(obj, ?) 
    End Function 

End Module 

Answer 1

Bu fonksiyon, Nesne tanımlanan, sen gölge çalıştığınız biri gibi görünüyor. "Eşittir" Gördüğünüz IntelliSense sizin modül adı paylaşılan biridir sonra önermek:

Public Shared Function Equals (objA As Object, objB As Object) As Boolean 

Onları documentation ayrı listelenmiş görebilirsiniz.IntelliSense onu düşündüren durdurmak için sadece modülünde bu şunlardır:

<EditorBrowsable(EditorBrowsableState.Never)> _ 
Public Function Equals(objA As Object, objB As Object) As Boolean 
    Return Object.Equals(objA, objB) 
End Function 

Bu standart `Object.Equals` yürütmesini eğer

Answer 2

Bunun için kurallar vardır ... ve basitçe yapamazsınız.

Shadows'u yalnızca sınıf düzeyinde kullanabilirsiniz. Bu, bir Gölgeler öğesinin bildirim içeriğinin bir sınıf olması gerektiği anlamına gelir; kaynak dosya, ad alanı, arabirim, modülü, yapı veya yordam olamaz.

Bu, bir yapı ve sınıfta ... lütfen

here daha bakın nedeni olduğuna inanılmaktadır. Altta, gölgelerin hangi bağlamda mevcut olabileceğini söylüyor.

Düzenleme - Çözüm

Eğer iki nesne eşit olup olmadığını belirlemek için kendi işlevi oluşturmak standart bir veya ne zaman kullanabileceğini hiç Object.Equals çağırmak için neden isteyeyim Emin değilim.

İşte denenmiş ve test olmuştur o kapalı çalışabilir basit bir çözümdür. Ayrıca, Equals'u birçok nesneye karşı kullanmak isterseniz, daha sonra Equals işlevini gölgeleyecek şekilde karşılaştırdıklarınız için daha fazla yapıya sahip olmanız gerekir. Equals bir String döndürür neden

Module TestModule Sub Main() Dim a As New Person("Stack", "Overflow") Dim b As New Person("Stack", "Overflow") Console.WriteLine(a.Equals(b)) End Sub Public Structure Person Private FirstName As String Private LastName As String Public Sub New(firstName As String, lastName As String) Me.FirstName = firstName Me.LastName = lastName End Sub <EditorBrowsable(EditorBrowsableState.Never)> Public Shadows Function Equals(ByVal obj As Object) As String Return If(Object.Equals(obj, Me), "TRUE", "FALSE").ToString End Function End Structure End Module 

Şimdi tabii ki aksi takdirde Yapamam, bilerek yüzden ben farklı bir türü dönen olarak temel sınıfı gölge yapar görebilirsiniz bunu, merak ediyor olabilirsiniz. Bir Boolean döndürmek ve dönüşü değiştirmek için bu işlevi değiştirebilirsiniz ve iyi çalışır.

Public Overridable Function Equals (obj As Object) As Boolean 

Ancak bu modülde yok: