Day関数は、指定された日付の日を表す1〜31の数値を返します。
Day(date)
ボタンを追加し、次の関数を追加します。
Private Sub Constant_demo_Click() msgbox(Day("2013-06-30")) End Sub
上記の関数を実行すると、次の出力が生成されます。
30