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


VB.NET TimeSpan.GreaterThan操作符代碼示例

本文整理匯總了VB.NET中System.TimeSpan.GreaterThan操作符的典型用法代碼示例。如果您正苦於以下問題:VB.NET TimeSpan.GreaterThan操作符的具體用法?VB.NET TimeSpan.GreaterThan怎麽用?VB.NET TimeSpan.GreaterThan使用的例子?那麽, 這裏精選的操作符代碼示例或許可以為您提供幫助。您也可以進一步了解該操作符所在System.TimeSpan的用法示例。


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

示例1: TSRelationalOpsDemo

' Example of the TimeSpan relational operators.
Module TSRelationalOpsDemo
    
    Const dataFmt As String = "{0,-47}{1}"

    ' Compare TimeSpan parameters, and display them with the results.
    Sub CompareTimeSpans( Left As TimeSpan, Right As TimeSpan, _
        RightText As String )

        Console.WriteLine( )
        Console.WriteLine( dataFmt, "Right: " & RightText, Right )
        Console.WriteLine( dataFmt, _
            "TimeSpan.op_Equality( Left, Right )", _
            TimeSpan.op_Equality( Left, Right ) )
        Console.WriteLine( dataFmt, _
            "TimeSpan.op_GreaterThan( Left, Right )", _
            TimeSpan.op_GreaterThan( Left, Right ) )
        Console.WriteLine( dataFmt, _
            "TimeSpan.op_GreaterThanOrEqual( Left, Right )", _
            TimeSpan.op_GreaterThanOrEqual( Left, Right ) )
        Console.WriteLine( dataFmt, _
            "TimeSpan.op_Inequality( Left, Right )", _
            TimeSpan.op_Inequality( Left, Right ) )
        Console.WriteLine( dataFmt, _
            "TimeSpan.op_LessThan( Left, Right )", _
            TimeSpan.op_LessThan( Left, Right ) )
        Console.WriteLine( dataFmt, _
            "TimeSpan.op_LessThanOrEqual( Left, Right )", _
            TimeSpan.op_LessThanOrEqual( Left, Right ) )
    End Sub 
        
    Sub Main( )
        Dim Left As New TimeSpan( 2, 0, 0 )
            
        Console.WriteLine( _
            "This example of the TimeSpan relational operators " & _
            "generates " & vbCrLf & "the following output. It " & _
            "creates several different TimeSpan " & vbCrLf & _
            "objects and compares them with a 2-hour " & _
            "TimeSpan." & vbCrLf )
        Console.WriteLine( dataFmt, "Left: TimeSpan( 2, 0, 0 )", Left )
            
        ' Create objects to compare with a 2-hour TimeSpan.
        CompareTimeSpans( Left, New TimeSpan( 0, 120, 0 ), _
            "TimeSpan( 0, 120, 0 )" )
        CompareTimeSpans( Left, New TimeSpan( 2, 0, 1 ), _
            "TimeSpan( 2, 0, 1 )" )
        CompareTimeSpans( Left, New TimeSpan( 2, 0, - 1 ), _
            "TimeSpan( 2, 0, -1 )" )
        CompareTimeSpans( Left, TimeSpan.FromDays( 1.0 / 12.0 ), _
            "TimeSpan.FromDays( 1 / 12 )" )
    End Sub 
End Module 

' This example of the TimeSpan relational operators generates
' the following output. It creates several different TimeSpan
' objects and compares them with a 2-hour TimeSpan.
' 
' Left: TimeSpan( 2, 0, 0 )                      02:00:00
' 
' Right: TimeSpan( 0, 120, 0 )                   02:00:00
' TimeSpan.op_Equality( Left, Right )            True
' TimeSpan.op_GreaterThan( Left, Right )         False
' TimeSpan.op_GreaterThanOrEqual( Left, Right )  True
' TimeSpan.op_Inequality( Left, Right )          False
' TimeSpan.op_LessThan( Left, Right )            False
' TimeSpan.op_LessThanOrEqual( Left, Right )     True
' 
' Right: TimeSpan( 2, 0, 1 )                     02:00:01
' TimeSpan.op_Equality( Left, Right )            False
' TimeSpan.op_GreaterThan( Left, Right )         False
' TimeSpan.op_GreaterThanOrEqual( Left, Right )  False
' TimeSpan.op_Inequality( Left, Right )          True
' TimeSpan.op_LessThan( Left, Right )            True
' TimeSpan.op_LessThanOrEqual( Left, Right )     True
' 
' Right: TimeSpan( 2, 0, -1 )                    01:59:59
' TimeSpan.op_Equality( Left, Right )            False
' TimeSpan.op_GreaterThan( Left, Right )         True
' TimeSpan.op_GreaterThanOrEqual( Left, Right )  True
' TimeSpan.op_Inequality( Left, Right )          True
' TimeSpan.op_LessThan( Left, Right )            False
' TimeSpan.op_LessThanOrEqual( Left, Right )     False
' 
' Right: TimeSpan.FromDays( 1 / 12 )             02:00:00
' TimeSpan.op_Equality( Left, Right )            True
' TimeSpan.op_GreaterThan( Left, Right )         False
' TimeSpan.op_GreaterThanOrEqual( Left, Right )  True
' TimeSpan.op_Inequality( Left, Right )          False
' TimeSpan.op_LessThan( Left, Right )            False
' TimeSpan.op_LessThanOrEqual( Left, Right )     True
開發者ID:VB.NET開發者,項目名稱:System,代碼行數:91,代碼來源:TimeSpan.GreaterThan


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