0

VB の DateTimePicker から日付と時刻を読み取る次のコードがあります。

最初の値が 0 か 1 か (例: 09:12... または 12:13...)、および文字列からその文字を削除するために 0 で始まるかどうかを判断できる必要があります。

これは私がこれまでに持っているものですが、関係なく最初の文字が必要です。

    DateFrom = Form1.DateTimePickerFrom.Value.ToString
    DateTo = Form1.DateTimePickerTo.Value.ToString
    VarTimeFrom = Form1.HourTimePickerFrom.Value.ToString
    VarTimeTo = Form1.HourTimePickerTo.Value.ToString

    Dim DateFromManipulated = Left(DateFrom, 10)
    Dim DateToManipulated = Left(DateTo, 10)
    Dim TimeFromManipulated = Right(VarTimeFrom, 9)
    Dim TimeToManipulated = Right(VarTimeTo, 9)

    If Left(DateFromManipulated, 1) = 0 Then

        TimeFromMan = TimeFromManipulated.Remove(0, 1)
    Else
        TimeFromMan = TimeFromManipulated
    End If


    If Left(TimeFromManipulated, 1) = 0 Then

        TimeToMan = TimeToManipulated.Remove(0, 1)
    Else
        TimeToMan = TimeToManipulated
    End If

    Console.WriteLine(DateFromManipulated)
    Console.WriteLine(TimeToMan)
    Console.WriteLine(TimeFromManipulated)
    Console.WriteLine(TimeFromMan)
    Console.WriteLine(DateToManipulated)
    Console.WriteLine(TimeToManipulated)

私は以下を取得します:

09/11/2012
1:36:00 
06:36:00 
6:36:00 
08/01/2013
11:36:00 

前もって感謝します!

マイク

4

1 に答える 1

4

VB.NETの文字列は、整数と同じとは比較されません。ただし、文字ゼロを参照することもできます。

If DateFromManipulated(0) = "0"c Then DateFromManipulated = DateFromManipulated.Substring(1)

...ただし、最初の日付を希望どおりにフォーマットする必要があります。

Dim dateFrom As String = DateTimePickerFrom.Value.ToString("M/dd/yyyy H:mm:ss")

... 例えば。(;とMは対照的に、先行ゼロはありません。)すべてのフォーマット文字列はここにあります:http://msdn.microsoft.com/en-us/library/8kb3ddd4.aspxMMH

于 2013-01-08T01:50:32.550 に答える