VB 演示如何获取星期名称，这里获取星期几是使用了VB内置的WeekdayName函数，将获取到的日期和星期几直接显示在Text控件中，下面是这个函数的具体用法： Private Sub Command1_Click() Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday) End Sub Private Sub Form_Load() Text1.Text = Date Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday) End Sub
