Export (0) Print
Expand All

Tuple(Of T1, T2, T3, T4, T5, T6, T7).Equals Method

Returns a value that indicates whether the current Tuple(Of T1, T2, T3, T4, T5, T6, T7) object is equal to a specified object.

Namespace:  System
Assembly:  mscorlib (in mscorlib.dll)

'Declaration
Public Overrides Function Equals ( _
	obj As Object _
) As Boolean

Parameters

obj
Type: System.Object
The object to compare with this instance.

Return Value

Type: System.Boolean
true if the current instance is equal to the specified object; otherwise, false.

The obj parameter is considered to be equal to the current instance under the following conditions:

  • It is a Tuple(Of T1, T2, T3, T4, T5, T6, T7) object.

  • Its seven components are of the same types as the current instance.

  • Its seven components have the same values as those of the current instance.

The following example defines an array of sextuples that contain population data for Los Angeles and New York from 1950 to 2000. The first component of each septuple identifies the city. The first, third, and fourth septuples contain data for New York. The first septuple is a duplicate of the fourth septuple. The third septuple identifies the city as "New York City" instead of "New York". As the example shows, only the fourth septuple is equal to the first septuple.


Module Example
   Public Sub Demo(ByVal outputBlock As System.Windows.Controls.TextBlock)
      ' Get population data for New York City and Los Angeles, 1960-2000.
      Dim urbanPopulations() = _
           { Tuple.Create("New York", 7891957, 7781984, 7894862, _
                          7071639, 7322564, 8008278), _
             Tuple.Create("Los Angeles", 1970358, 2479015, 2816061, _ 
                          2966850, 3485398, 3694820), _
             Tuple.Create("New York City", 7891957, 7781984, 7894862, _ 
                          7071639, 7322564, 8008278), _
             Tuple.Create("New York", 7891957, 7781984, 7894862, _ 
                          7071639, 7322564, 8008278) }
      ' Compare each tuple with every other tuple for equality.
      For ctr As Integer = 0 To urbanPopulations.Length - 2
         Dim urbanPopulation = urbanPopulations(ctr)
         outputBlock.Text &= urbanPopulation.ToString() + " = " & vbCrLf
         For innerCtr As Integer = ctr + 1 To urbanPopulations.Length - 1
            outputBlock.Text += String.Format("   {0}: {1}", urbanPopulations(innerCtr), _
                              urbanPopulation.Equals(urbanPopulations(innerCtr))) + vbCrLf
         Next
         outputBlock.Text &= vbCrLf
      Next
   End Sub
End Module
' The example displays the following output:
'    (New York, 7891957, 7781984, 7894862, 7071639, 7322564, 8008278) =
'       (Los Angeles, 1970358, 2479015, 2816061, 2966850, 3485398, 3694820): False
'       (New York City, 7891957, 7781984, 7894862, 7071639, 7322564, 8008278): False
'       (New York, 7891957, 7781984, 7894862, 7071639, 7322564, 8008278): True
'    
'    (Los Angeles, 1970358, 2479015, 2816061, 2966850, 3485398, 3694820) =
'       (New York City, 7891957, 7781984, 7894862, 7071639, 7322564, 8008278): False
'       (New York, 7891957, 7781984, 7894862, 7071639, 7322564, 8008278): False
'    
'    (New York City, 7891957, 7781984, 7894862, 7071639, 7322564, 8008278) =
'       (New York, 7891957, 7781984, 7894862, 7071639, 7322564, 8008278): False


Silverlight

Supported in: 5, 4

For a list of the operating systems and browsers that are supported by Silverlight, see Supported Operating Systems and Browsers.

Community Additions

ADD
Show:
© 2015 Microsoft