VBA で日付を表示

VBA で日付を表示するサンプルです。2013-05-16(木)のような形式で表示します。VBScriptでは動作しませんでした。




Sub hiduke()

  Dim hiduke

  hiduke = Now()

  MsgBox hiduke

  strKyou = Format(hiduke, "yyyy-mm-dd(aaa)")

  MsgBox strKyou

End Sub