VB6時刻の部分だけを取得する

スポンサーリンク

VB6 では、DateTime モジュールの TimeValue 関数が使えそうです。引数を文字列で指定する必要があるので、ちょっとつらいです。

サンプルコード

以下にサンプルコードを示します。

VB6.0 以前
    ' 必要な変数を宣言する
    Dim dtNow As Date
    dtNow = DateTime.Now

    ' 時刻の部分だけを取得する
    stPrompt = CStr(DateTime.TimeValue(CStr(dtNow)))

    ' 取得した時刻を表示する
    Call MsgBox(stPrompt)

関連するリファレンス

準備中です。

スポンサーリンク