一个很初级的问题

Question

Dim WeekInt as date            
  select case WeekInt
  Case 2,4,5
   If Time=#8:10:00# then
MMContrl1.filename="C:\wave\1.wave"
MMContrl1.command="sound"
         esle
         end if
  else case
  end select      我想让程序在指定星期几的指定时间(8:10:00)播放一个声音,在Timer控件里这样写为什么不行呢?
另:在窗体载入时已经有了MMC控件的另外一些必须的代码了.

Answer 1

Dim WeekInt as integer  WeekInt = Weekday(Date)

Answer 2

select case weekday(WeekInt,vbMonday )
.......