主题：win7 日期格式问题求助

Dim value() As String
Dim filter As String
Dim dt1 As Date
Dim dt2 As Date

value = e.node.fullpath.split("\")
Dim y As Integer = value(0)
dt1 = new Date(y,1,1)
dt2 = new Date(y,12,31)

MessageBox.Show(dt1 & dt2)

输出的日期是

此主题相关图片如下：1.png

怎么能把后边的星期几去掉啊