Single.Equals 方法
定義
重要
部分資訊涉及發行前產品,在發行之前可能會有大幅修改。 Microsoft 對此處提供的資訊,不做任何明確或隱含的瑕疵擔保。
回傳一個值,表示兩個 的 Single 實例是否代表相同值。
多載
| 名稱 | Description |
|---|---|
| Equals(Object) |
傳回值,指出這個實例是否等於指定的物件。 |
| Equals(Single) |
回傳一個值,表示該實例與指定 Single 物件是否代表相同值。 |
Equals(Object)
- 來源:
- Single.cs
- 來源:
- Single.cs
- 來源:
- Single.cs
- 來源:
- Single.cs
- 來源:
- Single.cs
傳回值,指出這個實例是否等於指定的物件。
public:
override bool Equals(System::Object ^ obj);
public override bool Equals(object obj);
public override bool Equals(object? obj);
override this.Equals : obj -> bool
Public Overrides Function Equals (obj As Object) As Boolean
參數
- obj
- Object
一個可以與此事比較的物件。
傳回
true 若 obj 是 的 Single 一個實例,且 等於該實例的值;否則, false。
範例
以下程式碼範例示範了此 Equals 方法。
obj1 = (Single)500;
if (a.Equals(obj1)) {
Console.WriteLine("The value type and reference type values are equal.");
}
let obj1 = single 500
if a.Equals obj1 then
printfn "The value type and reference type values are equal."
Obj1 = CType(500, Single)
If A.Equals(Obj1) Then
Console.WriteLine("The value type and reference type values are equal.")
End If
備註
Equals方法應該謹慎使用,因為兩個明顯相等的值可能會因為兩個值的不同精確度而不相等。 下列範例報告 Single 的值為 .3333,而將 1 除以 3 所得到的 Single 不相等。
// Initialize two floats with apparently identical values
float float1 = .33333f;
object float2 = 1/3;
// Compare them for equality
Console.WriteLine(float1.Equals(float2)); // displays false
// Initialize two floats with apparently identical values
let float1 = 0.33333f
let float2 = box (1f / 3f)
// Compare them for equality
printfn $"{float1.Equals float2}" // displays false
' Initialize two singles with apparently identical values
Dim single1 As Single = .33333
Dim single2 As Object = 1/3
' Compare them for equality
Console.WriteLine(single1.Equals(single2)) ' displays False
一種推薦的技巧是定義兩個值之間的可接受差距(例如其中一方值的0.01%)。 如果兩個值之間的差異絕對值小於或等於該邊界,則差異可能是由於有效位數的差異,因此,這些值可能會相等。 下列範例會使用這項技術來比較 .33333 和 1/3,前述 Single 程式碼範例發現兩個值不相等。
// Initialize two floats with apparently identical values
float float1 = .33333f;
object float2 = (float) 1/3;
// Define the tolerance for variation in their values
float difference = Math.Abs(float1 * .0001f);
// Compare the values
// The output to the console indicates that the two values are equal
if (Math.Abs(float1 - (float) float2) <= difference)
Console.WriteLine("float1 and float2 are equal.");
else
Console.WriteLine("float1 and float2 are unequal.");
// Initialize two floats with apparently identical values
let float1 = 0.33333f
let float2 = box (1f / 3f)
// Define the tolerance for variation in their values
let difference = abs (float1 * 0.0001f)
// Compare the values
// The output to the console indicates that the two values are equal
if abs (float1 - (float2 :?> float32)) <= difference then
printfn "float1 and float2 are equal."
else
printfn "float1 and float2 are unequal."
' Initialize two singles with apparently identical values
Dim single1 As Single = .33333
Dim single2 As Object = 1/3
' Define the tolerance for variation in their values
Dim difference As Single = Math.Abs(single1 * .0001f)
' Compare the values
' The output to the console indicates that the two values are equal
If Math.Abs(single1 - CSng(single2)) <= difference Then
Console.WriteLine("single1 and single2 are equal.")
Else
Console.WriteLine("single1 and single2 are unequal.")
End If
在此情況下,數值相等。
浮點數超出文件精度的精確度,取決於 .NET 框架的實作與版本。 因此,兩個特定數字的比較可能會因 .NET 框架內部表示的精確度而改變。
給呼叫者的注意事項
編譯器過載解析可能解釋兩種 Equals(Object) 方法過載行為上的表面差異。 如果定義了參數與 a obj 之間的Single隱式轉換,且參數未被指定為 Object,編譯器可能會執行隱式轉換並呼叫該Equals(Single)方法。 否則,他們會呼叫 該Equals(Object)方法,且當其false參數不是obj值時,該方法總是回傳Single。 以下範例說明兩種方法過載行為的差異。 除了 Visual Basic 中的 Double 以及 C# 中的 Decimal 和 Double 外,所有原始數值類型皆為 true,因為編譯器會自動進行擴寬轉換並呼叫 Equals(Single) 方法;而第二次比較則回傳 false,因為編譯器呼叫 Equals(Object) 方法。
using System;
public class Example2
{
static float value = 112;
public static void Main()
{
byte byte1= 112;
Console.WriteLine("value = byte1: {0,16}", value.Equals(byte1));
TestObjectForEquality(byte1);
short short1 = 112;
Console.WriteLine("value = short1: {0,16}", value.Equals(short1));
TestObjectForEquality(short1);
int int1 = 112;
Console.WriteLine("value = int1: {0,18}", value.Equals(int1));
TestObjectForEquality(int1);
long long1 = 112;
Console.WriteLine("value = long1: {0,17}", value.Equals(long1));
TestObjectForEquality(long1);
sbyte sbyte1 = 112;
Console.WriteLine("value = sbyte1: {0,16}", value.Equals(sbyte1));
TestObjectForEquality(sbyte1);
ushort ushort1 = 112;
Console.WriteLine("value = ushort1: {0,16}", value.Equals(ushort1));
TestObjectForEquality(ushort1);
uint uint1 = 112;
Console.WriteLine("value = uint1: {0,18}", value.Equals(uint1));
TestObjectForEquality(uint1);
ulong ulong1 = 112;
Console.WriteLine("value = ulong1: {0,17}", value.Equals(ulong1));
TestObjectForEquality(ulong1);
decimal dec1 = 112m;
Console.WriteLine("value = dec1: {0,21}", value.Equals(dec1));
TestObjectForEquality(dec1);
double dbl1 = 112;
Console.WriteLine("value = dbl1: {0,20}", value.Equals(dbl1));
TestObjectForEquality(dbl1);
}
private static void TestObjectForEquality(Object obj)
{
Console.WriteLine("{0} ({1}) = {2} ({3}): {4}\n",
value, value.GetType().Name,
obj, obj.GetType().Name,
value.Equals(obj));
}
}
// The example displays the following output:
// value = byte1: True
// 112 (Single) = 112 (Byte): False
//
// value = short1: True
// 112 (Single) = 112 (Int16): False
//
// value = int1: True
// 112 (Single) = 112 (Int32): False
//
// value = long1: True
// 112 (Single) = 112 (Int64): False
//
// value = sbyte1: True
// 112 (Single) = 112 (SByte): False
//
// value = ushort1: True
// 112 (Single) = 112 (UInt16): False
//
// value = uint1: True
// 112 (Single) = 112 (UInt32): False
//
// value = ulong1: True
// 112 (Single) = 112 (UInt64): False
//
// value = dec1: False
// 112 (Single) = 112 (Decimal): False
//
// value = dbl1: False
// 112 (Single) = 112 (Double): False
let value = 112f
let testObjectForEquality (obj: obj) =
printfn $"{value} ({value.GetType().Name}) = {obj} ({obj.GetType().Name}): {value.Equals obj}\n"
[<EntryPoint>]
let main _ =
let byte1= 112uy
printfn $"value = byte1: {value.Equals byte1,16}"
testObjectForEquality byte1
let short1 = 112s
printfn $"value = short1: {value.Equals short1,16}"
testObjectForEquality short1
let int1 = 112
printfn $"value = int1: {value.Equals int1,18}"
testObjectForEquality int1
let long1 = 112L
printfn $"value = long1: {value.Equals long1,17}"
testObjectForEquality long1
let sbyte1 = 112y
printfn $"value = sbyte1: {value.Equals sbyte1,16}"
testObjectForEquality sbyte1
let ushort1 = 112us
printfn $"value = ushort1: {value.Equals ushort1,16}"
testObjectForEquality ushort1
let uint1 = 112u
printfn $"value = uint1: {value.Equals uint1,18}"
testObjectForEquality uint1
let ulong1 = 112uL
printfn $"value = ulong1: {value.Equals ulong1,17}"
testObjectForEquality ulong1
let dec1 = 112m
printfn $"value = dec1: {value.Equals dec1,21}"
testObjectForEquality dec1
let dbl1 = 112.
printfn $"value = dbl1: {value.Equals dbl1,20}"
testObjectForEquality dbl1
0
// The example displays the following output:
// value = byte1: True
// 112 (Single) = 112 (Byte): False
//
// value = short1: True
// 112 (Single) = 112 (Int16): False
//
// value = int1: True
// 112 (Single) = 112 (Int32): False
//
// value = long1: True
// 112 (Single) = 112 (Int64): False
//
// value = sbyte1: True
// 112 (Single) = 112 (SByte): False
//
// value = ushort1: True
// 112 (Single) = 112 (UInt16): False
//
// value = uint1: True
// 112 (Single) = 112 (UInt32): False
//
// value = ulong1: True
// 112 (Single) = 112 (UInt64): False
//
// value = dec1: False
// 112 (Single) = 112 (Decimal): False
//
// value = dbl1: False
// 112 (Single) = 112 (Double): False
Module Example2
Dim value As Single = 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,16}", value.Equals(short1))
TestObjectForEquality(short1)
Dim int1 As Integer = 112
Console.WriteLine("value = int1: {0,18}", value.Equals(int1))
TestObjectForEquality(int1)
Dim long1 As Long = 112
Console.WriteLine("value = long1: {0,17}", value.Equals(long1))
TestObjectForEquality(long1)
Dim sbyte1 As SByte = 112
Console.WriteLine("value = sbyte1: {0,16}", 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 ulong1 As ULong = 112
Console.WriteLine("value = ulong1: {0,17}", value.Equals(ulong1))
TestObjectForEquality(ulong1)
Dim dec1 As Decimal = 112d
Console.WriteLine("value = dec1: {0,20}", 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
' The example displays the following output:
' value = byte1: True
' 112 (Single) = 112 (Byte): False
'
' value = short1: True
' 112 (Single) = 112 (Int16): False
'
' value = int1: True
' 112 (Single) = 112 (Int32): False
'
' value = long1: True
' 112 (Single) = 112 (Int64): False
'
' value = sbyte1: True
' 112 (Single) = 112 (SByte): False
'
' value = ushort1: True
' 112 (Single) = 112 (UInt16): False
'
' value = uint1: True
' 112 (Single) = 112 (UInt32): False
'
' value = ulong1: True
' 112 (Single) = 112 (UInt64): False
'
' value = dec1: True
' 112 (Single) = 112 (Decimal): False
'
' value = dbl1: False
' 112 (Single) = 112 (Double): False
另請參閱
適用於
Equals(Single)
- 來源:
- Single.cs
- 來源:
- Single.cs
- 來源:
- Single.cs
- 來源:
- Single.cs
- 來源:
- Single.cs
回傳一個值,表示該實例與指定 Single 物件是否代表相同值。
public:
virtual bool Equals(float obj);
public bool Equals(float obj);
override this.Equals : single -> bool
Public Function Equals (obj As Single) As Boolean
參數
- obj
- Single
一個可以與此事比較的物件。
傳回
true若等obj於此實例;否則,。 false
實作
備註
Single.Equals(Single) 方法實作了 System.IEquatable<T> 介面,且由於不需要將 Single.Equals(Object) 參數轉換成物件,因此比 obj 的效能稍微更好。
擴充轉換
根據您的程式設計語言,可能可以撰寫一個 Equals 方法,其中參數類型的位元數比實例類型少(或更窄)。 這是可能的,因為某些程式語言會執行隱式擴大轉換,把參數表示成與實例具有相同位元數的類型。
例如,假設實體類型為 Single ,且參數類型為 Int32。 Microsoft C# 編譯程式會產生指示,將參數的值表示為 Single 對象,然後產生 Single.Equals(Single) 方法,以比較 實例的值和參數的擴大表示法。
請參閱程式設計語言的檔,以判斷其編譯程式是否執行數值類型的隱含擴大轉換。 如需詳細資訊,請參閱 類型轉換數據表。
比較中的精確度
Equals方法應該謹慎使用,因為兩個明顯相等的值可能不相等,因為兩個值的精確度不同。 下列範例報告 Single 的值為 .3333,而將 1 除以 3 所得到的 Single 不相等。
// Initialize two floats with apparently identical values
float float1 = .33333f;
float float2 = 1/3;
// Compare them for equality
Console.WriteLine(float1.Equals(float2)); // displays false
// Initialize two floats with apparently identical values
let float1 = 0.33333f
let float2 = 1f / 3f
// Compare them for equality
printfn $"{float1.Equals float2}" // displays false
' Initialize two singles with apparently identical values
Dim single1 As Single = .33333
Dim single2 As Single = 1/3
' Compare them for equality
Console.WriteLine(single1.Equals(single2)) ' displays False
一種避免與比較相等相關的問題的比較技術,涉及定義兩個值之間可接受的差異邊界(例如其中一個值的 .01%)。 如果兩個值之間的差異絕對值小於或等於該邊界,則差異可能是有效位數差異的結果,因此,這些值可能會相等。 下列範例會使用這項技術來比較 .33333 和 1/3,這是前一個程式代碼範例發現不相等的兩 Single 個值。
// Initialize two floats with apparently identical values
float float1 = .33333f;
float float2 = (float) 1/3;
// Define the tolerance for variation in their values
float difference = Math.Abs(float1 * .0001f);
// Compare the values
// The output to the console indicates that the two values are equal
if (Math.Abs(float1 - float2) <= difference)
Console.WriteLine("float1 and float2 are equal.");
else
Console.WriteLine("float1 and float2 are unequal.");
// Initialize two floats with apparently identical values
let float1 = 0.33333f
let float2 = 1f / 3f
// Define the tolerance for variation in their values
let difference = abs (float1 * 0.0001f)
// Compare the values
// The output to the console indicates that the two values are equal
if abs (float1 - float2) <= difference then
printfn "float1 and float2 are equal."
else
printfn "float1 and float2 are unequal."
' Initialize two singles with apparently identical values
Dim single1 As Single = .33333
Dim single2 As Single = 1/3
' Define the tolerance for variation in their values
Dim difference As Single = Math.Abs(single1 * .0001f)
' Compare the values
' The output to the console indicates that the two values are equal
If Math.Abs(single1 - single2) <= difference Then
Console.WriteLine("single1 and single2 are equal.")
Else
Console.WriteLine("single1 and single2 are unequal.")
End If
在此情況下,數值相等。
Note
由於 Epsilon 定義範圍接近零之正值的最小運算式,因此差異的邊界必須大於 Epsilon。 通常,它是 Epsilon的好幾倍。 因此,建議您不要在比較Epsilon相等值時使用 Double 。
第二種技術,可避免與比較相等相關的問題,涉及比較兩個浮點數與某些絕對值之間的差異。 如果差異小於或等於該絕對值,數位就會相等。 如果某數字大於另一個,那麼這些數字不相等。 執行這項作的其中一種方式是任意選取絕對值。 不過,這是有問題的,因為可接受的差異邊界取決於值的大小 Single 。 第二種方式會利用浮點格式的設計功能:兩個浮點值整數表示法中的 mantissa 元件之間的差異表示分隔兩個值的可能浮點值數目。 例如,0.0 和 Epsilon 之間的差異是 1,因為在使用值為零的 Epsilon 時,Single 是最小可表示的值。 下列範例會使用這項技術來比較 .33333 和 1/3,這是上一個程式代碼範例使用 Double 方法發現不相等的兩個 Equals(Single) 值。 請注意,此範例會使用 BitConverter.GetBytes 和 BitConverter.ToInt32 方法,將單精度浮點數轉換成其整數表示法。
using System;
public class Example
{
public static void Main()
{
float value1 = .1f * 10f;
float value2 = 0f;
for (int ctr = 0; ctr < 10; ctr++)
value2 += .1f;
Console.WriteLine($"{value1:R} = {value2:R}: {HasMinimalDifference(value1, value2, 1)}");
}
public static bool HasMinimalDifference(float value1, float value2, int units)
{
byte[] bytes = BitConverter.GetBytes(value1);
int iValue1 = BitConverter.ToInt32(bytes, 0);
bytes = BitConverter.GetBytes(value2);
int iValue2 = BitConverter.ToInt32(bytes, 0);
// If the signs are different, return false except for +0 and -0.
if ((iValue1 >> 31) != (iValue2 >> 31))
{
if (value1 == value2)
return true;
return false;
}
int diff = Math.Abs(iValue1 - iValue2);
if (diff <= units)
return true;
return false;
}
}
// The example displays the following output:
// 1 = 1.00000012: True
open System
let hasMinimalDifference (value1: float32) (value2: float32) units =
let bytes = BitConverter.GetBytes value1
let iValue1 = BitConverter.ToInt32(bytes, 0)
let bytes = BitConverter.GetBytes(value2)
let iValue2 = BitConverter.ToInt32(bytes, 0)
// If the signs are different, return false except for +0 and -0.
if (iValue1 >>> 31) <> (iValue2 >>> 31) then
value1 = value2
else
let diff = abs (iValue1 - iValue2)
diff <= units
let value1 = 0.1f * 10f
let value2 =
List.replicate 10 0.1f
|> List.sum
printfn $"{value1:R} = {value2:R}: {hasMinimalDifference value1 value2 1}"
// The example displays the following output:
// 1 = 1.0000001: True
Module Example1
Public Sub Main()
Dim value1 As Single = .1 * 10
Dim value2 As Single = 0
For ctr As Integer = 0 To 9
value2 += CSng(.1)
Next
Console.WriteLine("{0:R} = {1:R}: {2}", value1, value2,
HasMinimalDifference(value1, value2, 1))
End Sub
Public Function HasMinimalDifference(value1 As Single, value2 As Single, units As Integer) As Boolean
Dim bytes() As Byte = BitConverter.GetBytes(value1)
Dim iValue1 As Integer = BitConverter.ToInt32(bytes, 0)
bytes = BitConverter.GetBytes(value2)
Dim iValue2 As Integer = BitConverter.ToInt32(bytes, 0)
' If the signs are different, Return False except for +0 and -0.
If ((iValue1 >> 31) <> (iValue2 >> 31)) Then
If value1 = value2 Then
Return True
End If
Return False
End If
Dim diff As Integer = Math.Abs(iValue1 - iValue2)
If diff <= units Then
Return True
End If
Return False
End Function
End Module
' The example displays the following output:
' 1 = 1.00000012: True
在超出文件所記載的精確度時,浮點數的精確度是特定於 .NET 的實作和版本的。 因此,兩個數字的比較可能會根據 .NET 的版本產生不同的結果,因為數位的內部表示精確度可能會變更。
給呼叫者的注意事項
編譯器過載解析可能解釋兩種 Equals(Object) 方法過載行為上的表面差異。 如果定義了參數與 a obj 之間的Single隱式轉換,且參數未被指定為 Object,編譯器可能會執行隱式轉換並呼叫該Equals(Single)方法。 否則,他們會呼叫 該Equals(Object)方法,且當其false參數不是obj值時,該方法總是回傳Single。 以下範例說明兩種方法過載行為的差異。 除了 Visual Basic 中的 Double 以及 C# 中的 Decimal 和 Double 外,所有原始數值類型皆為 true,因為編譯器會自動進行擴寬轉換並呼叫 Equals(Single) 方法;而第二次比較則回傳 false,因為編譯器呼叫 Equals(Object) 方法。
using System;
public class Example2
{
static float value = 112;
public static void Main()
{
byte byte1= 112;
Console.WriteLine("value = byte1: {0,16}", value.Equals(byte1));
TestObjectForEquality(byte1);
short short1 = 112;
Console.WriteLine("value = short1: {0,16}", value.Equals(short1));
TestObjectForEquality(short1);
int int1 = 112;
Console.WriteLine("value = int1: {0,18}", value.Equals(int1));
TestObjectForEquality(int1);
long long1 = 112;
Console.WriteLine("value = long1: {0,17}", value.Equals(long1));
TestObjectForEquality(long1);
sbyte sbyte1 = 112;
Console.WriteLine("value = sbyte1: {0,16}", value.Equals(sbyte1));
TestObjectForEquality(sbyte1);
ushort ushort1 = 112;
Console.WriteLine("value = ushort1: {0,16}", value.Equals(ushort1));
TestObjectForEquality(ushort1);
uint uint1 = 112;
Console.WriteLine("value = uint1: {0,18}", value.Equals(uint1));
TestObjectForEquality(uint1);
ulong ulong1 = 112;
Console.WriteLine("value = ulong1: {0,17}", value.Equals(ulong1));
TestObjectForEquality(ulong1);
decimal dec1 = 112m;
Console.WriteLine("value = dec1: {0,21}", value.Equals(dec1));
TestObjectForEquality(dec1);
double dbl1 = 112;
Console.WriteLine("value = dbl1: {0,20}", value.Equals(dbl1));
TestObjectForEquality(dbl1);
}
private static void TestObjectForEquality(Object obj)
{
Console.WriteLine("{0} ({1}) = {2} ({3}): {4}\n",
value, value.GetType().Name,
obj, obj.GetType().Name,
value.Equals(obj));
}
}
// The example displays the following output:
// value = byte1: True
// 112 (Single) = 112 (Byte): False
//
// value = short1: True
// 112 (Single) = 112 (Int16): False
//
// value = int1: True
// 112 (Single) = 112 (Int32): False
//
// value = long1: True
// 112 (Single) = 112 (Int64): False
//
// value = sbyte1: True
// 112 (Single) = 112 (SByte): False
//
// value = ushort1: True
// 112 (Single) = 112 (UInt16): False
//
// value = uint1: True
// 112 (Single) = 112 (UInt32): False
//
// value = ulong1: True
// 112 (Single) = 112 (UInt64): False
//
// value = dec1: False
// 112 (Single) = 112 (Decimal): False
//
// value = dbl1: False
// 112 (Single) = 112 (Double): False
let value = 112f
let testObjectForEquality (obj: obj) =
printfn $"{value} ({value.GetType().Name}) = {obj} ({obj.GetType().Name}): {value.Equals obj}\n"
[<EntryPoint>]
let main _ =
let byte1= 112uy
printfn $"value = byte1: {value.Equals byte1,16}"
testObjectForEquality byte1
let short1 = 112s
printfn $"value = short1: {value.Equals short1,16}"
testObjectForEquality short1
let int1 = 112
printfn $"value = int1: {value.Equals int1,18}"
testObjectForEquality int1
let long1 = 112L
printfn $"value = long1: {value.Equals long1,17}"
testObjectForEquality long1
let sbyte1 = 112y
printfn $"value = sbyte1: {value.Equals sbyte1,16}"
testObjectForEquality sbyte1
let ushort1 = 112us
printfn $"value = ushort1: {value.Equals ushort1,16}"
testObjectForEquality ushort1
let uint1 = 112u
printfn $"value = uint1: {value.Equals uint1,18}"
testObjectForEquality uint1
let ulong1 = 112uL
printfn $"value = ulong1: {value.Equals ulong1,17}"
testObjectForEquality ulong1
let dec1 = 112m
printfn $"value = dec1: {value.Equals dec1,21}"
testObjectForEquality dec1
let dbl1 = 112.
printfn $"value = dbl1: {value.Equals dbl1,20}"
testObjectForEquality dbl1
0
// The example displays the following output:
// value = byte1: True
// 112 (Single) = 112 (Byte): False
//
// value = short1: True
// 112 (Single) = 112 (Int16): False
//
// value = int1: True
// 112 (Single) = 112 (Int32): False
//
// value = long1: True
// 112 (Single) = 112 (Int64): False
//
// value = sbyte1: True
// 112 (Single) = 112 (SByte): False
//
// value = ushort1: True
// 112 (Single) = 112 (UInt16): False
//
// value = uint1: True
// 112 (Single) = 112 (UInt32): False
//
// value = ulong1: True
// 112 (Single) = 112 (UInt64): False
//
// value = dec1: False
// 112 (Single) = 112 (Decimal): False
//
// value = dbl1: False
// 112 (Single) = 112 (Double): False
Module Example2
Dim value As Single = 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,16}", value.Equals(short1))
TestObjectForEquality(short1)
Dim int1 As Integer = 112
Console.WriteLine("value = int1: {0,18}", value.Equals(int1))
TestObjectForEquality(int1)
Dim long1 As Long = 112
Console.WriteLine("value = long1: {0,17}", value.Equals(long1))
TestObjectForEquality(long1)
Dim sbyte1 As SByte = 112
Console.WriteLine("value = sbyte1: {0,16}", 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 ulong1 As ULong = 112
Console.WriteLine("value = ulong1: {0,17}", value.Equals(ulong1))
TestObjectForEquality(ulong1)
Dim dec1 As Decimal = 112d
Console.WriteLine("value = dec1: {0,20}", 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
' The example displays the following output:
' value = byte1: True
' 112 (Single) = 112 (Byte): False
'
' value = short1: True
' 112 (Single) = 112 (Int16): False
'
' value = int1: True
' 112 (Single) = 112 (Int32): False
'
' value = long1: True
' 112 (Single) = 112 (Int64): False
'
' value = sbyte1: True
' 112 (Single) = 112 (SByte): False
'
' value = ushort1: True
' 112 (Single) = 112 (UInt16): False
'
' value = uint1: True
' 112 (Single) = 112 (UInt32): False
'
' value = ulong1: True
' 112 (Single) = 112 (UInt64): False
'
' value = dec1: True
' 112 (Single) = 112 (Decimal): False
'
' value = dbl1: False
' 112 (Single) = 112 (Double): False