如何与其他人在一起

所以我在这里有这段代码:

While day = "M" Call Schedule(i) Wend While day = "T" Call Schedule(i) Wend While day = "W" Call Schedule(i) Wend While day = "R" Call Schedule(i) Wend While day = "F" Call Schedule(i) Wend 

有没有更简单的方法来编写所有这些while语句。 澄清事情,我有一个表格,有2000行与信息有关的课程,我希望代码阅读的日子顺序wekk:星期一,星期二,星期三,星期四,星期五,我怎么能这样做在这里。

提前致谢

执行多个案例的最简单方法是使用Select Case

 Select Case day Case "M" Schedule(i) Case "T" Schedule(i) Case "W" Schedule(i) Case "R" Schedule(i) Case "F" Schedule(i) End Select