1

こんにちは、誰でもこのコードで私を助けることができますか? 私のエラーは（「入力文字列が正しい形式ではありませんでした」）

私の lblmonin.text には ("hh:mm:ss") 形式と lblmonout.text ("hh:mm:ss") 形式があります

Dim TimeA As Date Dim TimeB As Date Dim hh As Integer Dim mm As Integer Dim ss As Integer

    'Calculation for Monday
    If Not Date.TryParse(lblmonin.Text, TimeA) Then
    End If
    If Not Date.TryParse(lblmonout.Text, TimeB) Then
    End If
    hh = TimeB.Subtract(TimeA).Hours
    mm = TimeB.Subtract(TimeA).Minutes
    ss = TimeB.Subtract(TimeA).Seconds

    Dim span As New TimeSpan
    span = TimeSpan.Parse(TimeB.ToShortTimeString) - TimeSpan.Parse(TimeA.ToShortTimeString)
    lblmontotal.Text = span.ToString
4

1 に答える 1

1

TimeSpan.Parse(AM/PM インジケータを含む)FormatExceptionによって返される文字列の形式を受け入れないため、 a をスローします。DateTime.ToShortTimeString

2 つの日付を減算するだけです。

span = TimeB - TimeA
于 2013-06-18T20:20:07.860 に答える