내보내기(0) 인쇄
모두 확장
정보
요청한 주제가 아래에 표시됩니다. 그러나 이 주제는 이 라이브러리에 포함되지 않습니다.

TimeSpan.CompareTo 메서드 (TimeSpan)

2013-12-13

이 인스턴스를 지정된 TimeSpan 개체와 비교하고 이 인스턴스가 나타내는 시간 간격이 지정된 TimeSpan 개체가 나타내는 시간 간격보다 긴지, 같은지 또는 짧은지를 나타내는 정수를 반환합니다.

Namespace:  System
어셈블리:  mscorlib(mscorlib.dll)

‘선언
Public Function CompareTo ( _
	value As TimeSpan _
) As Integer

매개 변수

value
형식: System.TimeSpan
이 인스턴스와 비교할 개체입니다.

반환 값

형식: System.Int32
이 인스턴스와 value의 상대 값을 나타내는 부호 있는 숫자입니다.

설명

음의 정수

이 인스턴스가 value보다 짧습니다.

0

이 인스턴스는 value와 같습니다.

양의 정수

이 인스턴스가 value보다 큽니다.

Implements

IComparable(Of T).CompareTo(T)

이 메서드는 System.IComparable(Of T) 인터페이스를 구현하며, value 매개 변수를 개체로 변환할 필요가 없기 때문에 TimeSpan.CompareTo 메서드보다 조금 더 나은 성능을 제공합니다.

다음 코드 예제에서는 여러 값 및 참조 형식에 대한 CompareTo 메서드의 제네릭 버전과 제네릭이 아닌 버전을 보여 줍니다.


' This example demonstrates the generic and non-generic versions of the 
' CompareTo method for several base types.
' The non-generic version takes a parameter of type Object, while the generic
' version takes a type-specific parameter, such as Boolean, Int32, or Double.


Class Example
   Public Shared Sub Demo(ByVal outputBlock As System.Windows.Controls.TextBlock)
      Dim nl As String = vbCrLf
      Dim msg As String = _
          "{0}The following is the result of using the generic and non-generic{0}" & _
          "versions of the CompareTo method for several base types:{0}"

      Dim now As DateTime = DateTime.Now
      ' Time span = 11 days, 22 hours, 33 minutes, 44 seconds
      Dim tsX As New TimeSpan(11, 22, 33, 44)
      ' Version = 1.2.333.4
      Dim versX As New Version("1.2.333.4")
      ' Guid = CA761232-ED42-11CE-BACD-00AA0057B223
      Dim guidX As New Guid("{CA761232-ED42-11CE-BACD-00AA0057B223}")

      Dim a1 As [Boolean] = True, a2 As [Boolean] = True
      Dim b1 As [Byte] = 1, b2 As [Byte] = 1
      Dim c1 As Int16 = -2, c2 As Int16 = 2
      Dim d1 As Int32 = 3, d2 As Int32 = 3
      Dim e1 As Int64 = 4, e2 As Int64 = -4
      Dim f1 As [Decimal] = -5.5D, f2 As [Decimal] = 5.5D
      Dim g1 As [Single] = 6.6F, g2 As [Single] = 6.6F
      Dim h1 As [Double] = 7.7, h2 As [Double] = -7.7
      Dim i1 As [Char] = "A"c, i2 As [Char] = "A"c
      Dim j1 As String = "abc", j2 As String = "abc"
      Dim k1 As DateTime = now, k2 As DateTime = now
      Dim l1 As TimeSpan = tsX, l2 As TimeSpan = tsX
      Dim m1 As Version = versX, m2 As New Version("2.0")
      Dim n1 As Guid = guidX, n2 As Guid = guidX

      ' The following types are not CLS-compliant.
      ' SByte, UInt16, UInt32, UInt64

      outputBlock.Text &= String.Format(msg, nl) & vbCrLf
      Try
         ' The second and third Show method call parameters are automatically boxed because
         ' the second and third Show method declaration arguments expect type Object.

         Show(outputBlock, "Boolean:  ", a1, a2, a1.CompareTo(a2), a1.CompareTo(CObj(a2)))
         Show(outputBlock, "Byte:     ", b1, b2, b1.CompareTo(b2), b1.CompareTo(CObj(b2)))
         Show(outputBlock, "Int16:    ", c1, c2, c1.CompareTo(c2), c1.CompareTo(CObj(c2)))
         Show(outputBlock, "Int32:    ", d1, d2, d1.CompareTo(d2), d1.CompareTo(CObj(d2)))
         Show(outputBlock, "Int64:    ", e1, e2, e1.CompareTo(e2), e1.CompareTo(CObj(e2)))
         Show(outputBlock, "Decimal:  ", f1, f2, f1.CompareTo(f2), f1.CompareTo(CObj(f2)))
         Show(outputBlock, "Single:   ", g1, g2, g1.CompareTo(g2), g1.CompareTo(CObj(g2)))
         Show(outputBlock, "Double:   ", h1, h2, h1.CompareTo(h2), h1.CompareTo(CObj(h2)))
         Show(outputBlock, "Char:     ", i1, i2, i1.CompareTo(i2), i1.CompareTo(CObj(i2)))
         Show(outputBlock, "String:   ", j1, j2, j1.CompareTo(j2), j1.CompareTo(CObj(j2)))
         Show(outputBlock, "DateTime: ", k1, k2, k1.CompareTo(k2), k1.CompareTo(CObj(k2)))
         Show(outputBlock, "TimeSpan: ", l1, l2, l1.CompareTo(l2), l1.CompareTo(CObj(l2)))
         Show(outputBlock, "Version:  ", m1, m2, m1.CompareTo(m2), m1.CompareTo(CObj(m2)))
         Show(outputBlock, "Guid:     ", n1, n2, n1.CompareTo(n2), n1.CompareTo(CObj(n2)))
         '
         outputBlock.Text &= String.Format("{0}The following types are not CLS-compliant:", nl) & vbCrLf
         outputBlock.Text &= String.Format("SByte, UInt16, UInt32, UInt64") & vbCrLf

      Catch e As Exception
         outputBlock.Text &= e.GetType().Name & vbCrLf
      End Try
   End Sub 'Main

   Public Shared Sub Show(ByVal outputBlock As System.Windows.Controls.TextBlock, ByVal caption As String, ByVal var1 As [Object], ByVal var2 As [Object], _
                          ByVal resultGeneric As Integer, ByVal resultNonGeneric As Integer)
      Dim relation As String

      outputBlock.Text &= caption
      If resultGeneric = resultNonGeneric Then
         If resultGeneric < 0 Then
            relation = "less than"
         ElseIf resultGeneric > 0 Then
            relation = "greater than"
         Else
            relation = "equal to"
         End If
         outputBlock.Text &= String.Format("{0} is {1} {2}", var1, relation, var2) & vbCrLf

         ' The following condition will never occur because the generic and non-generic
         ' CompareTo methods are equivalent.

      Else
         outputBlock.Text &= String.Format("Generic CompareTo = {0}; non-generic CompareTo = {1}", _
                            resultGeneric, resultNonGeneric) & vbCrLf
      End If
   End Sub 'Show
End Class 'Sample
'
'This example produces the following results:
'
'The following is the result of using the generic and non-generic versions of the
'CompareTo method for several base types:
'
'Boolean:  True is equal to True
'Byte:     1 is equal to 1
'Int16:    -2 is less than 2
'Int32:    3 is equal to 3
'Int64:    4 is greater than -4
'Decimal:  -5.5 is less than 5.5
'Single:   6.6 is equal to 6.6
'Double:   7.7 is greater than -7.7
'Char:     A is equal to A
'String:   abc is equal to abc
'DateTime: 12/1/2003 5:37:46 PM is equal to 12/1/2003 5:37:46 PM
'TimeSpan: 11.22:33:44 is equal to 11.22:33:44
'Version:  1.2.333.4 is less than 2.0
'Guid:     ca761232-ed42-11ce-bacd-00aa0057b223 is equal to ca761232-ed42-11ce-bacd-00
'aa0057b223
'
'The following types are not CLS-compliant:
'SByte, UInt16, UInt32, UInt64
'


Windows Phone OS

지원되는 버전: 8.0, 7.1, 7.0

Windows Phone

표시:
© 2014 Microsoft