排课系统.pdf

排课系统 自己动手开发排课系统 唐山师范学院玉田分校 张贻忠 洪成波（064100） 摘要： 对一个较大的学校，排课表是件大事，尤其是象计算机类课、音乐类课、舞蹈类课、体育类课、美术类课 ，需要在公用上课地点进行，如何避免冲突、合理利用资源，这给排课增加了很大难度。用Excel VBA开发一款排课系统，能很好地解决这个难题，让工作简单化。 关键词： Excel VBA、排课。 设计思路： 一、系统构成： 使用六张工作表构成排课系统工作簿，分别为：【系统界面】、【基础设置】、【教师任课】、【各班课 表】、【排课模板】、【课表模板】。其中： 1、 【基础设置】工作表，用于设置基础数据，包括： （1）使用单位名称；（2）班级编号、班级名称；（3）每天节数、每周天数；（4）学科编号、学科名称 ；（5）上课地点编号、上课地点名称。 2、 【教师任课】工作表，存放教师任课信息和教师个人课表数据，包括： （1）教师编号、教师姓名；（2）任课信息（任教班+任教学科+任教节数+上课地点）；（3）个人课表数 据（班级编号+学科编号+上课地点编号）。 3、 【各班课表】工作表，存放各班课表数据，包括： （1）班级编号；（2）班级课表数据（教师编号+学科编号+上课地点编号） 二、排课原理 （1）选择教师；（2）提取选定教师任课信息（任教班+任教学科+任教节数+上课地点）；（3）生成该教 师任教的所有班课表；（4）提取这些班已经排入的课程信息；（5）标记公共上课地点已经被排课的课时 ；（6）添加任课代码；（7）保存排课时，检查各班课时数是否正确，排课是否出现冲突；（8）将教师任 课数据以编号的形式分别存放到【教师任课】和【各班课表】中。 三、查询和打印课表 选择班级或教师，提取班级课表数据，填入课表模板，并将编号形式转换成名称格式，以便查询打印各 班课表或教师个人课表。 四、系统操作： 整个程序使用下拉菜单配合命令按钮，利用用户窗体设置参数，完成操作。 制作方法： 一、工作表制作 1、【系统界面】工作表制作（如下图）： Sheet0 (系统界面)图 （1）合并及居中D4:J7单元格，黑体、蓝色、48磅，用于显示单位名称，对齐方式为缩小字体填充。（2） 合并及居中C4:K14单元格，琥珀体、红色、72磅，用于显示系统名称。（3）整个工作表填充淡蓝色底色。 2、【基础设置】工作表制作（如下图）： Sheet1 (基础设置)图 第 1 页 共 28 页 排课系统 （1）把A2:B100、H2:I100、K2:L100设置为允许用户编辑区域，对齐方式为缩小字体填充；（2）A列为“ 班级编号”（第一位：年级编号、二三位：班级序号），B列为“班级名称”；（3）D2为“每天节数”；（4） E2为每周天数；（5）F2为使用单位名称；（6）H列为“学科编号”，用01～99，I列为“学科名称”，（7）K 列为“上课地点编号”,用01～99，L列为“上课地点名称”（8）隐藏C、G、J列；（9）在D4:F15区域内输入必 要的说明（如下表）。 ———— 说明 ———— 1、[班级编号]使用三位阿拉伯数字。 第一位为[班级代码], 1 = 一年级、2 = 二年级。 第二、三位为[班顺序号]，01 = 一班、02 = 二班。 最多99个[班级]。 2、[每天节数]最大值为13。 3、[每周天数]最大值为7。 4、[学科编号]使用二位阿拉伯数字，从01依次递增。 最多99个[学科]。 5、[地点编号]使用二位阿拉伯数字，从01依次递增。