時間の書式設定（HH：MM：SS）

Question

時間、分、秒の数値のアップとダウンから値を取得しています。 15：：

問題は、例えば、時間があれば、例えば、9.15は9として、それが表示されますだということである私がやりたいことはフォーマットがそれらである

0の値のいずれか（時間もしそうなら、分または秒）が10未満の場合は、数字の前に0が追加され、数字が09:15:00と表示されます。

私が試したことはこれですが、それは動作しません：

Sub BtnSetClick(sender As Object, e As EventArgs) 

     lbl8.Visible = True 

     Dim nmTime As String = nmHour.Value.ToString + nmMin.Value.ToString + nmSec.Value.ToString 



     lblST.Text.Format(nmTime.ToString, "HH:MM:SS") 


     lblST.Text = (nmTime) 

     lblST.Visible = True 

    End Sub 

Answer 1

これを試してみてください：

Sub BtnSetClick(ByVal sender As Object, ByVal e As EventArgs)   

    lbl8.Visible = True   
    Dim nmTime As String = nmHour.Value.ToString().PadLeft(2, '0') + nmMin.Value.ToString().PadLeft(2, '0') + nmSec.Value.ToString().PadLeft(2, '0')    

    lblST.Text = nmTime   
    lblST.Visible = True  
End Sub 

Answer 2

あなたは文字列に複数回、すべてを変換することによって、少し後方にそれをやっているように見える、このような何かしてみてください：

Dim ts As new TimeSpan(CInt(nmHour.Value), CInt(nmMin.Value), CInt(nmSec.Value)) 
lblST.Text = ts.ToString("HH:MM:SS") 

を

TimeSpan.ToStringのドキュメントは便利です。

編集：Timのデータ型に関するコメントを反映するようにコードを更新しました。

Answer 3

は、TimeSpanオブジェクトを使用してみてください、それはあなたのためのすべてのハードワークを行う必要があります！

Dim nmTime As New TimeSpan(nmHour.Value, nmMin.Value, nmSec.Value) 

lblST.Text = nmTime.ToString 
lblST.Visible = True