VB6日付の部分だけを取得する

スポンサーリンク

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

サンプルコード

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

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

    ' 日付の部分だけを取得する
    Dim stPrompt As String
    stPrompt = CStr(DateTime.DateValue(CStr(dtNow)))

    ' 取得した日付を表示する
    Call MsgBox(stPrompt)

関連するリファレンス

準備中です。

スポンサーリンク