當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET UInt64.Equals方法代碼示例

本文整理匯總了VB.NET中System.UInt64.Equals方法的典型用法代碼示例。如果您正苦於以下問題:VB.NET UInt64.Equals方法的具體用法?VB.NET UInt64.Equals怎麽用?VB.NET UInt64.Equals使用的例子?那麽, 這裏精選的方法代碼示例或許可以為您提供幫助。


在下文中一共展示了UInt64.Equals方法的3個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: Example

Module Example
   Public Sub Main()
      Dim values() As Object = { 10S, 20S, 10I, 20I, 10L, 20L,
                                 10R, 20R, 10US, 20US, 10UI, 20UI,
                                 10UL, 20UL }
      Dim baseValue As UInt64 = 20
      Dim baseType As String = baseValue.GetType().Name
      
      For Each value In values
         Console.WriteLine("{0} ({1}) = {2} ({3}): {4}",
                           baseValue, baseType,
                           value, value.GetType().Name,
                           baseValue.Equals(value))
      Next
   End Sub
End Module
開發者ID:VB.NET開發者,項目名稱:System,代碼行數:16,代碼來源:UInt64.Equals

輸出:

20 (UInt64) = 10 (Int16): False
20 (UInt64) = 20 (Int16): False
20 (UInt64) = 10 (Int32): False
20 (UInt64) = 20 (Int32): False
20 (UInt64) = 10 (Int64): False
20 (UInt64) = 20 (Int64): False
20 (UInt64) = 10 (Double): False
20 (UInt64) = 20 (Double): False
20 (UInt64) = 10 (UInt16): False
20 (UInt64) = 20 (UInt16): False
20 (UInt64) = 10 (UInt32): False
20 (UInt64) = 20 (UInt32): False
20 (UInt64) = 10 (UInt64): False
20 (UInt64) = 20 (UInt64): True

示例2: Example

Module Example
   Dim value As UInt64 = 112
   
   Public Sub Main()
      Dim byte1 As Byte = 112
      Console.WriteLine("value = byte1: {0,16}", value.Equals(byte1))
      TestObjectForEquality(byte1)
      
      Dim short1 As Short = 112
      Console.WriteLine("value = short1: {0,17}", value.Equals(short1))
      TestObjectForEquality(short1)

      Dim int1 As Integer = 112
      Console.WriteLine("value = int1: {0,19}", value.Equals(int1))
      TestObjectForEquality(int1)

      Dim sbyte1 As SByte = 112
      Console.WriteLine("value = sbyte1: {0,17}", value.Equals(sbyte1))
      TestObjectForEquality(sbyte1)
      
      Dim ushort1 As UShort = 112
      Console.WriteLine("value = ushort1: {0,16}", value.Equals(ushort1))
      TestObjectForEquality(ushort1)

      Dim uint1 As UInteger = 112
      Console.WriteLine("value = uint1: {0,18}", value.Equals(uint1))
      TestObjectForEquality(uint1)

      Dim dec1 As Decimal = 112d
      Console.WriteLine("value = dec1: {0,21}", value.Equals(dec1))
      TestObjectForEquality(dec1)

      Dim dbl1 As Double = 112
      Console.WriteLine("value = dbl1: {0,20}", value.Equals(dbl1))
      TestObjectForEquality(dbl1)
   End Sub
   
   Private Sub TestObjectForEquality(obj As Object)
      Console.WriteLine("{0} ({1}) = {2} ({3}): {4}",
                        value, value.GetType().Name,
                        obj, obj.GetType().Name,
                        value.Equals(obj))
      Console.WriteLine()
   End Sub
End Module
開發者ID:VB.NET開發者,項目名稱:System,代碼行數:45,代碼來源:UInt64.Equals

輸出:

value = byte1:             True
112 (UInt64) = 112 (Byte): False

value = short1:             False
112 (UInt64) = 112 (Int16): False

value = int1:               False
112 (UInt64) = 112 (Int32): False

value = sbyte1:             False
112 (UInt64) = 112 (SByte): False

value = ushort1:             True
112 (UInt64) = 112 (UInt16): False

value = uint1:               True
112 (UInt64) = 112 (UInt32): False

value = dec1:                 False
112 (UInt64) = 112 (Decimal): False

value = dbl1:                False
112 (UInt64) = 112 (Double): False

示例3: Example

Class Example
   Public Shared Sub Main()
      Dim value1 As UInt64 = 50
      Dim value2 As UInt64 = 50
      
      'Display the values.
      Console.WriteLine("value1:   Type: {0}   Value: {1}",
                        value1.GetType().Name, value1)
      Console.WriteLine("value2:   Type: {0}   Value: {1}",
                        value2.GetType().Name, value2)

      ' Compare the two values.
      Console.WriteLine("value1 and value2 are equal: {0}",
                        value1.Equals(value2))
   End Sub
End Class
開發者ID:VB.NET開發者,項目名稱:System,代碼行數:16,代碼來源:UInt64.Equals

輸出:

value1:   Type: UInt64   Value: 50
value2:   Type: UInt64   Value: 50
value1 and value2 are equal: True


注:本文中的System.UInt64.Equals方法示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。