请教一个EXCEL的列属性设置的问题

[wxmccb]

我在用VB.NET写一个EXCEL遇到这样一个问题
EXCEL中有一列（如第一列是序号字段，单元格式：数字）现在我想把数字换成日期
如下语句：
wsheet.workbooks.item(1).worksheets("sheet1").cells(1,1).value=cstr(now()).year) & "年" & cstr(now().month) & "月"
然而在EXCEL中出现的不是想要的结果，而是数字。我想应该是EXCEL的列属性问题
现在的问题是：如何用代码设置EXCEL的单元格式为文本格式