把Datetime.Now写入文件的有关问题

把Datetime.Now写入文件的问题
我想把Datetime.Now   和一段文字写到文件。但提示有错误~请各位帮忙~~
dim   a   as   string
Open   "t1.txt "   For   Append   As   #1
a   =   DateTime.Now   +   vbTab   +   a
Print   #1,   a
Close   #1

------解决方案--------------------
dim a as string
Open "t1.txt " For Append As #1
a = cstr(DateTime.Now) + vbTab + a
Print #1, a
Close #1

------解决方案--------------------
其实你把加号改成 & 也可以了。还不用cstr函数