VBS　Dateadd関数の実行

VBSについて、おそらく初歩的な質問です。 以下のプログラムが実行できないのはなぜでしょうか。。 また、メッセージボックスにy(5)の値(2017/08/10 11:00:00 ) を表示するにはどのように訂正すればよいでしょうか。 よろしくお願いします。 ------------------------------------------------------------------------- Option Explicit Dim ans, y(5), n y(0)=2017/08/10 4:00:00 　　　　　　　　　　 y(1)=DateAdd("n",100, y(0))　　　　　　　　　　　　 y(2)=DateAdd("n",40, y(1)) y(3)=DateAdd("n",115, y(2)) y(4)=DateAdd("n",45, y(3)) y(5)=DateAdd("n",120, y(4)) ans = y(5) MsgBox ans, , "答え"