如题：我用了几个方式都觉得不怎么对头，请问大家怎么做的？
我只需要年和月，不要日期和时间。比如：

2013/4
2013-4
2013年4月

Year(Date) & " 年 " & Month(Date) & " 月 "
如果你想用文本框显示出来可以这样试试：
Private Sub Command1_Click()
Text1 = Year(Date) & " 年 " & Month(Date) & " 月 "
End Sub

谢谢你的帮助，你的方法我尝试了一下，我用的是win7系统，日期后面总带个“星期几”，没有效果

我试了win7和XP应当是没有问题：

有星期几的问题是windows系统设置的事，你可设置为不带星期的显示。（我的winxp系统是在控制面板_区域和语言选项_自定义中设置）

[ 本帖最后由 zhengang1026 于 2013-4-27 17:02 编辑 ]

明白了！数据库和实际处理的时候不同是吧？我试试！谢谢大家的帮助！