如何把日期选择控件的星期几改为只要星期几后面的数字

怎么把日期选择控件的星期几改为只要星期几后面的数字？
如题。把日期选择框(MonthView)的星期几去掉星期二字。

例如：
星期日 星期一 星期二 ……
改为：
日 一 二 ……
否则按照前面的格式，日期选择框显示的太大了。

------解决方案--------------------
我这里没有“星期”俩字啊
------解决方案--------------------

探讨

呵呵 谢谢楼上, 楼主要问问题自己都不想花点时间写清楚点, 那我也没辙啦.

如果是控件上面的话, 如果它有句柄就可以使用 Sendmessage 改掉它

------解决方案--------------------
Option Explicit
Dim aa$
Private Sub MonthView1_DateClick(ByVal DateClicked As Date)
aa = MonthView1.Year & "/" & MonthView1.Month & "/" & MonthView1.Day
'MsgBox WeekdayName(Weekday(aa))
MsgBox Right(WeekdayName(Weekday(aa)), 1)
End Sub