VB程序题：用计算机安排考试日程。期末某专业在周一~周六的6天时间内要考x,y,z三门课程，考试顺序为先考x，然后考y，最后考z，规定一天只能考一门，且z课程只能安排在周五或周六考。编写程序 龚沛曾

VB程序题：用计算机安排考试日程。期末某专业在周一~周六的6天时间内要考x,y,z三门课程，考试顺序为先考x，然后考y，最后考z，规定一天只能考一门，且z课程只能安排在周五或周六考。编写程序安排考试日程（即x,y,z）,要求列出满足条件的所有方案。（wb98.com)
 
解题，窗体上画一个按钮，用三重循环来解决此题，代码很简单：（wb86.com VB源代码)
Private Sub Command1_Click()
    Cls
    For i = 1 To 4  '由于有顺序要求，所以x课程只能在星期一到星期四考
        For j = i + 1 To 5 'y考试按顺序就只能在x的第二天 -- 星期五
            For k = 5 To 6 'z考试只能在星期五或星期六考
                If i < j And j < k Then Print "x"; i, "y"; j, "z"; k
            Next k
        Next j
    Next i
End Sub

运行程序效果图如下：

Visual Basic程序设计教程(第3版) (龚沛曾等编)课后实验源码

打赏 支付宝打赏 微信打赏

来源：济亨网

本文链接：http://www.wb86.com/post/78.html