Dim t As Date = "2013-11-7"
方法 1 (.net的)
MessageBox.show(t.ToString("dddd",new System.Globalization.CultureInfo("zh-cn")))
方法 2 (狐表自身的)
MessageBox.show(Format(t, "dddd"))