数据库课程设计学生考勤系统.docx

《数据库课程设计学生考勤系统.docx》由会员分享，可在线阅读，更多相关《数据库课程设计学生考勤系统.docx（31页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、.一、综合设计目的、条件、任务和内容要求： 针对系统来说主要任务是设计一个学生考勤管理系统，实现学生考勤的录入、按班级统计、浏览、查询某学生全部考勤、请假、销假等功能。整个考勤系统能够提供请假、休学和退学等情况的记录，并实现等处理功能。具体的设计任务如下：1、实现用户登录和修改密码和创立用户帐户；2、能查看、查询、输入、添加、修改、删除学生根本信息，包括姓名、性别、班级、出生日期等；3、能查看、查询、输入、添加、修改、删除课程信息，包括教师信息、课程编号等；4、能查看、查询、输入、添加、修改、删除班级信息，浏览班级根本信息；5、能查看、查询、输入、添加、修改、删除考勤信息，包括请假和销假信息；

2、6、能按学号、姓名、班级、专业、查询学生考勤，请假信息；7、能按专业或班级统计学生考勤，请假信息，并可以在里面进展按学号或姓名的查询等。 指导教师签字： 年 月 日二、进度安排：1、总体方案设计1-2天2、编程实现5-6天3、测试分析和书写报告2-3天三、应收集资料和主要参考文献：1 童爱红.Visual C#.NET应用教程，北京：清华大学出版社，2004.2 杨晓光.Visual C#.NET程序设计，北京：清华大学出版社；北京交通大学出版社2004.3 周忠荣.数据库原理与应用Access，北京：清华大学出版社，2003.4 周学军.SQL Server 2000根底教程，北京：清华大学

3、出版社，2005.四、综合设计摘要：学生考勤管理系统作为一个高校的根本管理，是学校对学生工作管理的根本依据。开发考勤管理系统，正是完善高校信息化管理的重要环节。人工考勤已很难满足学校标准化管理的要求，面对庞大的信息量，该方式现存在很多弊端。因此，建立现代化的智能考勤管理系统势在必行。这样也大大减轻了考勤工作人员的工作量，提高了工作效率，使原本复杂和枯燥无味的工作变得简单而轻松。本文以“考勤信息管理系统的设计和开发为例，系统地阐述了考勤系统的设计开发的全过程，包括系统整体设计，逻辑框架与数据流程，各个功能模块划分，系统功能模块的设计与具体实现等局部。该系统侧重于学生考勤信息查询和数据库的维护，通

4、过已编制好的程序，完成对用户的登录、考勤信息的添加、查询、统计，学生请假和销假等，本系统使用的开发工具是VC 6.0开发程序，采用sql数据库。实现学生考勤数据采集、数据统计和信息查询过程的自动化，完善学生管理现代化，方便管理人员统计、考核学生出勤情况，方便学生管理部门查询、考核学生的出勤率，准确地掌握学生出勤情况和相关资料，有效地管理、掌握学生各项情况。关键词：数据；查询；数据库.目 录摘 要 . .I第一章 绪论. . .11.1 课题背景. . .11.2 课题目的和要求.11.3 课题意义.1第二章系统分析 . . 32.1 功能需求分析.3 2.2 系统需求分析.3 第三章详细设计.

5、53.1 主要设计思想.5 3.2 数据库分析与设计.53.3 系统功能模块设计.9 第四章设计结果和分析.114.1 系统的实现.11 4.2 系统的测试.11 总 结 .14 致 谢 .15 参考文献 .16 附录 主要程序代码 .17摘 要学生考勤管理系统作为一个高校的根本管理，是学校对学生工作管理的根本依据。开发考勤管理系统，正是完善高校信息化管理的重要环节。人工考勤已很难满足学校标准化管理的要求，面对庞大的信息量，该方式现存在很多弊端。因此，建立现代化的智能考勤管理系统势在必行。这样也大大减轻了考勤工作人员的工作量，提高了工作效率，使原本复杂和枯燥无味的工作变得简单而轻松。本文以“考

6、勤信息管理系统的设计和开发为例，系统地阐述了考勤系统的设计开发的全过程，包括系统整体设计，逻辑框架与数据流程，各个功能模块划分，系统功能模块的设计与具体实现等局部。该系统侧重于学生考勤信息查询和数据库的维护，通过已编制好的程序，完成对用户的登录、考勤信息的添加、查询、统计，学生请假和销假等，本系统使用的开发工具是VC 6.0开发程序，采用sql数据库。实现学生考勤数据采集、数据统计和信息查询过程的自动化，完善学生管理现代化，方便管理人员统计、考核学生出勤情况，方便学生管理部门查询、考核学生的出勤率，准确地掌握学生出勤情况和相关资料，有效地管理、掌握学生各项情况。关键词：数据；查询；数据库Abs

7、tractStudents attendance management system as a college of the basic management, is the school to the student the basic foundation of management. Development of check on work attendance management system, perfect college is an important link of information management. Artificial attendance already d

8、ifficult to meet the requirements of the standardized management school, in the face of the huge amount of information, this mode existing in many disadvantages. Therefore, establishing modern intelligent attendance management system is imperative. This also greatly to reduce attendance staff work a

9、nd enhance the working efficiency, make originally complex and dry work become simple and easy.This article by attendance information management system the design and development as an example, systematically elaborated the attendance system design and development process, including the system overa

10、ll design, logic framework and the data flow, each function module partition, the system function module design and implementation of a part of. The system focuses on the student attendance information query and database maintenance, has been compiled through good program and the completion of the u

11、ser login, attendance information to add, inquiry, statistics, students leave and terminate his/her leave, etc., the system use of development tools is VC6.0 development process, using SQL database. To realize students attendance data acquisition, data statistics and information query process automa

12、tion, perfect the students management modernization, convenient management statistics, assessment students attendant, convenient student management department inquiry, assessment of students attendance, accurately grasp the students attendance and related material, effective management, students acq

13、uire the situation.Keywords：data; inquire; data base第一章 绪论课题背景程序实践是本科生重要教学环节之一。通过程序实践，强化学生的计算机应用技能，使学生验证、稳固和充实所学的理论知识， 加深对相关内容的理解，拓宽知识面，培养学生的创新精神和实践能力。学生考勤管理程序是学校管理工作中一个比拟重要的任务，过多的学生考勤管理程序工作给学校管理人员带来了很大麻烦的。虽然原始的记录方法在一定的程度上可以解决问题，可是现在计算机已经走到了我们的生活，它的缺乏之处就显而易见了。 学生考勤管理程序,是一个对于学生考勤的管理系统, 不仅大大减少了考勤管理人员的

14、大量的工作，而且还方便了班级和学校对学生出课率的查询,只要通计算机登入本系统就能和时修改、更正学生的考勤信息,使信息真实、有效。这样节省了大量人力物力，节省了珍贵的时间,大大提高了工作效率.用C+语言进展了该系统的编写。操作上力争实现人性化、合理化，满足学校、教师、非计算机管理人员的使用和查看。课题目的和要求目的：要求实现-“学生考勤管理程序记录学生的缺课情况，它包括：缺课日期、第几节课、课程名称、学生姓名、缺课类型迟到、早退、请假和旷课。要求： 1.录入学生的缺课记录；2修改某个学生的缺课记录；3查询某个学生的缺课情况；4统计某段时间内，某门课旷课学生姓名和旷课次数，按旷课次数由多到少排序；

15、 5统计某段时间内，有学生旷课的课程和旷课人次，按旷课人次由多到少排序。课题意义程序实践是本科生重要教学环节之一。通过程序实践，强化学生的计算机应用技能，使学生验证、稳固和充实所学的理论知识， 加深对相关内容的理解，拓宽知识面，培养学生的创新精神和实践能力。学生考勤管理程序可以大大减缓学生考勤人员的工作量, 方便了平时上课学生的出勤率的管理。第二章 系统分析考勤管理系统是高校对考勤实行了信息化管理，考勤管理中主要涉和的管理任务有4个方面：学生根本信息管理、考勤信息管理、考勤查询浏览管理以和系统管理，实现学生考勤的录入、按班级统计、浏览、查询某学生全部考勤、请假、销假等功能。因此，该系统使用Vi

16、sual C和sql server数据库开发系统作了考勤管理系统。学生的根本信息、学生考勤、系统用户管理，适用于各高等学校单位。考勤系统的目的是为实现学生考勤数据采集、数据统计和信息查询过程的自动化，完善学生管理现代化，方便管理人员统计、考核学生出勤情况，方便学生管理部门查询、考核学生的出勤率；准确地掌握学生出勤情况，有效地管理、掌握学生流动情况。 本课题要实现的是学生考勤管理系统，在设计时应该有友好的用户界面，便于考勤管理员的操作，系统应有根本功能如下：1考勤管理员用户登录功能；2学生考勤管理相关信息的管理功能；3查询功能；2. 用户界面需求对于一个好的软件有一个友好的用户界面是很重要的。用

17、户界面应尽量做的简单、层次清晰明了，以最大限度为用户提供操作方便。如尽量减少用户输入次数，多使用快捷按扭等。本系统使用的开发语言是Visual C 6.0，数据库采用的是sql server，以Windows XP系统为操作平台。考勤管理系统能够提供学生考勤的情况记录，方便地对学生考勤进展评定。考勤情况主要由考勤班干部记录然后上交到考勤管理员，需要设置人工添加的功能，如出勤记录、考勤统计、学生信息等，已备特殊情况的处理；还能够提供请假、休学和退学等情况的记录，并实现查询、添加、修改、删除、浏览等处理功能；能具有一定的平安性、协调性和完整性。考勤管理者可直接操作各考勤情况，考勤管理人员功能的信息

18、量大，数据平安性和保密性要求最高，本系统考勤管理人员全部开放，对非管理员不需密码，可直接进入进展查阅。管理员可以浏览、查询、添加、删除、修改、统计学生考勤的根本信息；浏览、查询、统计、添加、删除和修改学生的根本信息，这局部功能由学生处管理人员执行。考勤管理系统通过考勤信息判断并记录学生出勤信息，可以保证考勤数据的准确、公正、平安，减少考勤人员的工作负担，防止人为因素的干扰和弄虚作假现象；各管理用计算机和管理软件用Windows环境下的全中文界面平台，能灵活处理各种特殊情况，方便的修改各种根本信息，提供丰富的统计信息，查询方便，管理平安，操作简便易学。经过开发人员的讨论，对考勤管理系统应实现的功

19、能描述如下：1、用户信息管理用户信息管理的根本功能是添加、修改、删除和浏览用户详细信息。管理考勤人员使用系统自己创立用户帐号，用户的具体属性包括用户帐号、用户密码。2、信息管理学生信息、班级简况信息、班级成员信息、课程信息、考勤信息、请销假信息，管理人员可以对其进展添加、修改、删除和浏览等。3、学生考勤的录入功能考勤人员能够把学生的考勤记录请假、销假等输入到相应的数据库，也可对其进展添加、修改、删除。4、浏览功能考勤人员能够浏览学生考勤记录和历史考勤记录，能通过显示菜单浏览全部信息。5、查询功能考勤人员能够按学号、姓名查询某学生的考勤记录或按专业、班级查询某个班级的考勤记录。6、修改功能考勤人

20、员具有修改学生的考勤记录，如请假、销假、旷课等记录。7、请销假功能考勤人员能够记录学生的请假、销假功能。第三章 详细设计数据库工具：为解决学生信息与班级信息、课程信息的复杂的对应关系，选用关系型数据库管理工具建立它们之间的关联关系；查询方式：为方便查询，不仅要考虑按学生学号、姓名确实定查询方式，还要考虑满足考勤管理人员的不确定查询方式等。为此，我们采取模块化设计思想，通过各模块的不同组合以实现不同的查询功能。最终，使系统能够具有内容标准、信息完整、查询便捷等特点。基于上面的分析，对学生考勤信息管理系统进展以下分析：1、实现系统登录2、信息管理3、考勤、请假信息的查询3.2 数据库分析与设计对数

21、据库中的各项数据进展整理分析，确定系统中所有实体、实体的属性和实体之间的联系，为设计数据库表构造打下根底。整个系统各实体可用以下关系来表示其中主键已出生日期用下划线标识：学 生学号 ，姓名，性别，出生日期，联系方式，班级编号班 级班级编号，班级名称，专业，班主任，班长，人数课 程课程编号，课程名称，任课教师考 勤学号，课程编号，考勤日期，考勤记录 帐 户帐户，密码3.2.2 E-R图分析E-R图分析的目的是确定系统中所有实体、实体的属性和实体之间的联系，为设计数据库表构造打下根底。画E-R图通常使用自底向上的设计方法，首先对局部视图进展分析设计，然后再将局部视图合并，消除冲突和冗余，得到系统的

22、总体E-R图。这里不再对局部视图进展设计，直接给出总体E-R图 如下列图所示：课程名称学 号请假记录请假日期销假日期销假记录班主任课程考勤学生班级选课出勤考勤组成请销假课程编号任课教师考勤日期考勤记录课程编号学 号学号姓名性别出生日期联系方式班级编号班级名称班长班级人数n1n113.1 E-R图 基于以上的功能分析，可为考勤系统创立7个数据表。应用和维护都比拟方便。将其中的数据表设计如下表： 表3-1 考勤表字段数据类型长度是否为主键字段数据类型长度是否为主键学号文本12是课程编号文本6是考勤日期日期/时间短日期是考勤记录文本4否表3-2 请销假表字段数据类型长度是否为主键学号文本12是请假记

23、录文本3否请假日期日期/时间短日期否销假记录文本1否销假日期日期/时间短日期否表3-3 班级简况表字段数据类型长度是否为主键班级编号文本6是班级名称文本6否班主任文本6否班长文本6否人数数字整型否表3-4 课程表字段数据类型长度是否为主键课程编号文本6是课程名称文本10否任课教师文本6否表3-5 学生简况表字段数据类型长度是否为主键学号文本12是姓名文本6否性别文本1否出生日期日期/时间短日期否联系方式文本12否表3-6 帐户表字段数据类型长度是否为主键帐户文本16是密码文本16否3.2.4 表间关系本管理系统共用到六个表：考勤表、请销假表、班级表、班级简况表、课程表、学生简况表、帐户表，各表

24、之间均有一定的关系，可以进展关联。考勤表、班级成员表、学生简况表、请销假表，这四个表里面都有一个一样的字段:学号,通过学号这个字段就可以将系统的这四个表关联了起来，当某个表发生插入、修改、删除等方面的改动时，相联的表之间也要进展相应的改动。班级成员表、班级简况表也有一个一样的字段:班级编号，将两表相关联。考勤表、课程表通过一样字段：课程编号，将两表相关联。 各表间的关系图 学生考勤管理系统按班级统计按专业统计管理统计考勤数据维护课程信息学生信息请销假信息考勤信息按班级查询班级成员班级信息按学号查询按姓名查询按专业查询重新登录退出系统此系统共有四个模块，分别为：管理、查询、数据维护、统计。功能模

25、块考勤信息管理系统的主要体系如下列图所示：学生考勤管理系统按班级统计按专业统计管理统计考勤数据维护课程信息学生信息请销假信息考勤信息按班级查询班级成员班级信息按学号查询按姓名查询按专业查询重新登录退出系统 系统模块设计3.5 程序流程图第四章 设计结果和分析第四章 设计结果和分析4.1 系统的实现通过几周的紧张忙碌，我们只是根本上完成了它的一些根本功能它主要包括三个模块：教师模块、学生模块、管理员模块。对于管理员模块，主要实现了对教师、学生的信息管理，对其进展添加、删除、修改和删除等功能做得还不够完善。同时，一个网站还应该具有很友好的界面，而且，能够对外起到宣传作用，这也就是说我们在首页应该选

26、择具有特色的页面，使其真正到达目的，而不仅仅是一个摆设。 系统提供了管理子系统，包括对数据库中的课题信息、用户信息的管理以和课题审批的管理和报表的查看。允许具有管理权限的人员对系统数据库进展操作。 系统的测试本课题研究目的是设计并实现一个课题申报管理系统。系统实现功能包括：对用户和权限，各种课题信息，教师自拟题目，课题发布，课题题库，学生申报课题，用户信息，课题查询，课题审批，报表的查看和打印等的管理。本章对该课题申报管理系统进展了系统功能和性能的测试，以验证系统是否实现设计要求的功能和性能指标。合完成功能性测试，编写测试下如表1所示。下表中只列出主要的测试用例的标题和期望结果。这些测试用例不

27、仅测试管理员模块系统设计的主要功能，还包括系统平安的测试例如非法访问，权限控制。 表4-1测试用例序号测试用例标题期望结果1添加用户成功，验证用户是否具有权限，如果没有，不允许操作；如果有那么正确判断用户名是否已存在，如已存在给出错误提示，如不存在完成用户信息的正确添加。 2修改用户成功，验证用户是否具有权限，如果没有，不允许操作；如果有那么用户信息得到正确修改。表4-1测试用例续序号测试用例标题期望结果3删除用户成功，验证用户是否具有权限，如果没有，不允许操作；如果有那么用户信息正确删除。4查询教师、学生信息成功，联合查询字符串正确，且准确返回查询结果，并按相应日志方案添加日志信息。5查看实

28、践课题信息成功，验证用户是否具有权限，如果没有，不允许操作；如果有那么允许用户正确修改目标课题在数据表中的状态信息，并按相应日志方案添加日志信息。6审批实践课题信息成功，验证用户是否具有权限，如果没有，不允许操作；如果有那么正确审批，并修改目标档案在数据表中的状态信息，并按相应日志方案添加日志信息。7报表打印成功，验证用户是否具有权限，如果没有，不允许操作；如果有那么正确对课题信息进展操作并打印其课题报表。4.2.2 系统测试 对照表1中的测试内容，表2给出其对应的测试结果。由测试结果可以看出：该课题申报管理系统能够完成对课题申报的管理，系统平安性也能得到很好的控制。表4-2 测试结果序号测试

29、用例标题测试结果测试结果说明1添加用户通过用户信息正确插入相应的表。2修改用户通过在相应的表中的该用户信息被正确修改。3删除用户通过该用户信息被准确地从相应的表中删除。4查询教师、学生信息通过教师、学生列表页面中的DataGrid中的数据能正确显示出来，与数据库中的一样。5查看实践课题信息通过实践课题信息列表页面中的DataGrid中的数据能正确显示需要显示的信息。6审批实践课题信息通过审核时，题目审批状态默认为“未通过状态，点击“通过，在审核栏中会显示“已通过字体颜色变红色，数据库“Subject_Check中就由“Null变成“False或者“True。7报表查看不能通过不能正确显示所需要

30、的各信息内容生成报表。总 结通过这次课程设计，我才知道我的缺乏之处，这次不我主要做了程序编写、才知道不是那么的简单、创立表、查询、窗体、宏、模块，一开场我觉得它就是创立一些表格，然后再用一些语句根据他们之间的关系，把它们组合在一起、 在之间遇到了一些麻烦、不过还是解决了、其中最根本的就是子查询了、我的子查询经历就是先写出select * 我们要找什么，然后写条件，我们要找的东西有什么条件，然后在写条件，我们的条件涉和那些表，那些字段，再在这些字段中通过我们学过的简单select语句选出来，有时候还要用到几层子查询，在这点思路不是很清晰、到最后还是做出来了。经过数据库课程的学习，我们掌握了创立数

31、据库以和对数据库的操作的根底知识。教师的教学耐心细致，课堂上我们有不理解的地方教师都反复讲解，不过那时我都在开小差，没有好好听，到现在才知道根底知识的掌握很重要、不过数据库这门课涉和到以前的知识不多，所以这次勉强做出了这次课程设计，现在我知道了数据库这是一门很值得学的课程，学过获益匪浅。致 谢这次数据库的程序设计，对于我来说是一个挑战。我在C+语言的学习过程中的困难并不只在程序的设计中有所表达，每一个函数都设计好了，也调试好了，把它们分开运行并没有错误，但是当把它们组合成一个程序时，便是一个一个地出现错误；把这个问题解决了，另一个新问题又来了。这不能不说是对知识的欠缺。通过这次的程序设计，我懂

32、得了无论什么事都要去做才会发现问题，才有可能去解决问题。对知识的学习，不能潜偿辄止，要深入去学习，去了解，这样才会有所收获。有许多东西，许多事，不是想像中的那么容易，不去实践，永远也不会有提高，尤其是学习计算机。同时，在这次课程设计的过程中，我认识到学好计算机要重视实践操作，不仅仅是学习C+语言，还是其它的语言，以和其它的计算机方面的知识都要重在实践，不能只是学习和重视书本上的理论知识，所以日后在学习过程中，我会更加注视实践操作，使自己更好地学好计算机这门课程。 以前做实验题目的时候总是感觉很难，因为根本就不知道从哪里开场。这次课程设计让我对编程有了新的认识，也是我知道了只有自己亲自动手才能学

33、到更多东西。拿到题目的时候也是很困惑但仔细琢磨后也不是想象中那么难，觉得就是上课讲到的一些内容，是自己先把自己吓住了。后来，参照书上的和网上的诸多例子，一个模块一个模块的编写，调试，一个功能一个功能去完善。发现越做越顺利，由于以前的实验中对于改错的经历积累和几个学得不错的同学的帮助，我的程序中的错误也一个一个的顺利解决。再后来，等我的程序完全做好以后，我竟然可以独立的帮同学修改一些以前根本不知所以然的错误，其实，从这次实验中我认识到，我距离高手还很远，编程有很多的乐趣也有很多的技巧性和知识性。我将在以后的日子里继续认真的学习知识，积累经历，让自己的编程能力提高。总之，我决得编程就是要请自动手，

34、孰能生巧，感谢学校给我们这次时机使我们通过这次试验学到了很多东西。参考文献1 童爱红.Visual C#.NET应用教程，北京：清华大学出版社，2004.2 杨晓光.Visual C#.NET程序设计，北京：清华大学出版社；北京交通大学出版社2004.3 周忠荣.数据库原理与应用Access，北京：清华大学出版社，2003.4 周学军.SQL Server 2000根底教程，北京：清华大学出版社，2005.附录：主要程序代码1.主窗口代码Option Compare DatabasePrivate Sub Command2_Click()On Error GoTo Err_Command2_C

35、lickExit_Command2_Click: Exit SubErr_Command2_Click: Resume Exit_Command2_ClickEnd SubPrivate Sub Command10_Click()DoCmd.RunMacro 班级信息End SubPrivate Sub Command11_Click()DoCmd.RunMacro 班级成员End SubPrivate Sub Command34_Click()End SubPrivate Sub Command5_Click()On Error GoTo Err_Command5_Click Dim stD

36、ocName As String Dim stLinkCriteria As String stDocName = ChrW(-29698) & ChrW(31243) DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command5_Click: Exit SubErr_Command5_Click: Resume Exit_Command5_ClickEnd SubPrivate Sub Command7_Click()DoCmd.RunMacro 学生信息End SubPrivate Sub Command8_Click()DoCmd.R

37、unMacro 请销假End SubPrivate Sub Command9_Click()DoCmd.RunMacro 考勤End SubOption Compare DatabasePrivate Sub Command5_Click()On Error GoTo Err_Command5_ClickExit_Command5_Click: Exit SubErr_Command5_Click: Resume Exit_Command5_ClickEnd SubPrivate Sub Command6_Click()If Text1 = zt And Text3 = 000 ThenDoC

38、md.RunMacro dlText1 = Text3 = Else: MsgBox 用户名或密码错误！Text1 = Text3 = End IfEnd SubPrivate Sub Command8_Click()On Error GoTo Err_Command8_ClickExit_Command8_Click: Exit SubErr_Command8_Click: Resume Exit_Command8_Click End SubOption Compare DatabaseSub Form_Current()On Error GoTo Form_Current_Err If C

39、hildFormIsOpen() Then FilterChildFormForm_Current_Exit: Exit SubForm_Current_Err: MsgBox Error$ Resume Form_Current_ExitEnd SubSub ToggleLink_Click()On Error GoTo ToggleLink_Click_Err If ChildFormIsOpen() Then CloseChildForm Else OpenChildForm FilterChildForm End IfToggleLink_Click_Exit: Exit SubTog

40、gleLink_Click_Err: MsgBox Error$ Resume ToggleLink_Click_ExitEnd SubPrivate Sub FilterChildForm() If Me.NewRecord Then Forms!考勤1.DataEntry = True Else Forms!考勤1.Filter = 班级编号 = & & Me.班级编号 & Forms!考勤1.FilterOn = True End IfEnd SubPrivate Sub OpenChildForm() DoCmd.OpenForm 考勤1 If Not Me.ToggleLink Then Me!ToggleLink = TrueEnd SubPrivate Sub CloseChildForm() DoCmd.Close acForm, 考勤1 If Me!ToggleLink Then Me!ToggleLink = FalseEnd SubPrivate Function ChildFormIsOpen() ChildFormIsOpen = (SysCmd(acSysCmdGetObjectState, acForm, 考勤1) And acObjStateOpen) FalseEnd Functio