[VB.net]TimeSpan構造体で時間、分の差分を求める

2021年9月10日

書式
1.TotalHours
整数部と小数部から成る時間数で表される、現在の TimeSpan 構造体の値を取得します。
2.TotalMinutes
整数部と小数部から成る分数で表される、現在の TimeSpan 構造体の値を取得します。

使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Module Module1
Sub Main()
' 指定日時1
Dim dtA As New DateTime(2021, 9, 1, 11, 0, 0)
' 指定日時2
Dim dtB As New DateTime(2021, 9, 2, 12, 0, 0)
' 引き算
Dim res As New TimeSpan
res = dtB - dtA
'時間の差分
Console.WriteLine(res.TotalHours)
'分の差分
Console.WriteLine(res.TotalMinutes)
Console.ReadKey()
End Sub
End Module
Module Module1 Sub Main() ' 指定日時1 Dim dtA As New DateTime(2021, 9, 1, 11, 0, 0) ' 指定日時2 Dim dtB As New DateTime(2021, 9, 2, 12, 0, 0) ' 引き算 Dim res As New TimeSpan res = dtB - dtA '時間の差分 Console.WriteLine(res.TotalHours) '分の差分 Console.WriteLine(res.TotalMinutes) Console.ReadKey() End Sub End Module
Module Module1

    Sub Main()

        ' 指定日時1
        Dim dtA As New DateTime(2021, 9, 1, 11, 0, 0)

        ' 指定日時2
        Dim dtB As New DateTime(2021, 9, 2, 12, 0, 0)

        ' 引き算
        Dim res As New TimeSpan

        res = dtB - dtA

        '時間の差分
        Console.WriteLine(res.TotalHours)

        '分の差分
        Console.WriteLine(res.TotalMinutes)

        Console.ReadKey()

    End Sub

End Module

結果
25
1500

VB.net

Posted by arkgame