TimeValue関数は、指定された入力文字列を有効な時間に変換します。
TimeValue(StringTime)
ボタンを追加し、次の関数を追加します。
Private Sub Constant_demo_Click() msgbox(TimeValue("20:30")) msgbox(TimeValue("5:15")) msgbox(TimeValue("2:30:58")) End Sub
上記の関数を実行すると、次の出力が生成されます。
8:30:00 PM 5:15:00 AM 2:30:58 AM