还剩54页未读,继续阅读
本资源只提供10页预览,全部文档请下载后查看!喜欢就下载吧,查找使用更方便
文本内容:
蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节蕿螁膅莄螄蚇膄蒆薇羆膃膆螃羂膃莈薆袈膂蒁袁螄膁薃蚄肂膀芃蒇羈腿莅蚂袄芈蒇蒅螀芇膇蚀蚆芇艿蒃肅芆蒁蝿羁芅薄薁袇芄芃螇螃芃莆薀肂节蒈螅羈莁薀薈袄莁芀螄螀羇莂薆蚆羆薅袂肄羅芄蚅羀羄莇袀袆羄葿蚃螂羃薁蒆肁肂芁蚁羇肁莃蒄袃肀蒅蚀衿聿芅蒂螅肈莇螈肃肈蒀薁罿肇薂螆袅肆节莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀袅袀节莃螁衿莄薈蚇袈肄莁薃袇膆薆袂羆芈荿螈羅莁薅蚄羅膀莈蚀羄芃蚃薆羃莅蒆袄羂肅蚁螀羁膇蒄蚆肀艿蚀薂聿莁蒂袁聿肁芅螇肈芃蒁螃肇莆莃虿肆肅蕿薅肅膈莂袄肄芀薇螀膃莂莀蚆膃肂薆薂膂膄莈羀膁莇薄袆膀葿蒇螂腿腿蚂蚈螆芁蒅薄螅莃蚀袃螄肃蒃蝿袃膅虿蚅袂芇蒂薁袁蒀芄罿袁腿薀第1章系统简述人类已经跨入了新世纪,正在进入信息时代我国国民经济和社会发展第十个五年计划将国民经济和社会信息化作为覆盖现代化建设全局的战略举措,要求加速发展信息产业,大力推进信息化现在信息技术的应用越来越普及,不但促进了社会的高速发展,也改变着人们的工作、学习、生活和娱乐的方式以及思想观念随着计算机的日益普及,计算机软件无处不在软件在计算机的发展和应用中至关重要,在人类进入信息化社会时成为新兴信息产业的支柱应用软件是在特定领域内开发,为特定目的服务的一类软件,而在事务管理、办公自动化方面的软件在企事业机关迅速推广,带给了我们惊人的工作效率为了加深对软件工程及数据库相关知识的了解,掌握相关的开发工具本人选择了“学籍管理系统”作为此次毕业设计该“学籍管理系统”采用了当今最热门的编程工具visualbasic整个系统具有界面简单大方,功能强大,易操作,易扩充,安全性高等特点该系统适合各个院校及用以学生的学籍管理及日常事务的处理
1.1任务概述
1.
1.1开发意图 a.为了学籍管理系统更完善;b.为了教学办公室对学生档案的管理更方便
1.
1.2应用目标通过本系统软件,能帮助教研人员利用计算机,快速方便的对学生学籍管理进行管理、输入、输出、删除、修改、查询的所需操作,使散乱的人事档案能够具体化、直观化、合理化
1.
1.3作用及范围 本软件适用于教育界,对学生的学籍可以随时输入、输出、删除、修改、查询
1.2开发工具的选用对于此学籍管理系统的开发,我选择VB作为其开发工具VisualBasic是一个强大的Windows平台上的开发工具,是基于Basic的可视化的程序设计语言VisualBasic
6.0比老版本VisualBasic
4.0增加了许多新功能VisualBasic
6.0的变量几乎可以存储任何东西,它包括数值型、字符型、日期型、逻辑型、变体型、对象型等变量类型,而且变量类型可以转换对于一个相当大型的应用程序,可以引入MDI窗体,一个应用程序允许有一个MDI父窗体和多个MDI子窗体对象(Object)是面向对象的程序设计(OOP)技术中的重要概念,具有封装性(Encapsulation)、继承性(Inheritance)和多态性(Polymorphism)类模块(ClassModule)的三大要素是属性(Properties)、方法(Methods)和事件(Events)VB
6.0的特点VB主要功能特点如下
1.具有面向对象的可视化设计工具
2.事件驱动的编程机制
3.提供了易学易用的应用程序集成开发环境
4.结构化的程序设计语言
5.支持多种数据库系统的访问
6.OLE技术
7.Active技术
8.完备的Help联机帮助功能VB
6.0新功能特点
1.新增控件
2.语言新功能
3.数据库功能的增强
4.增强网络功能
5.新增了多个应用程序想导
1.3数据环境本学籍管理系统采用Microsoft的Access2000数据库
1.
3.1数据库的概念
1.数据库数据库DataBaseDB是存储在计算机内、有组织的、可共享的数据的集合其目的是为了便于计算机快速查询与检索一个数据库可以分解为若干个记录(Record),每一个记录又包含若干字段(Field)数据库有多种结构,如文件型(Flatefile)、关系型Relational、层次型Hierarchical、网络型Interbase与面向对象型Objectorienteddatabase等这种集合具有以下特点1以一定的数据模型组织数据,数据尽可能不重复2以最优方式为某个特定组织的多种应用服务3其数据结构独立于使用它的应用程序4对数据的定义、操纵和控制,由数据库管理系统统一进行管理和控制
2.数据库系统数据库系统是以数据库为核心,并以管理为目的的计算机系统他由计算机硬件和计算机软件组成计算机硬件资源包括主机和输入/输出设备数据库系统的硬件应具有足够大的安全的磁盘等直接存储设备,用于安全地存储庞大的数据;具有较高的通信能力,以提高数据传送率;要求数据联网,实现数据共享软件系统包括操作系统、数据库管理系统及其开发工具和在此支持下建立起来的数据库和应用程序
1.
3.2MicrosoftAccess2000的简介 MicrosoftAccess是基于Windows平台设计的数据库管理系统Access2000关系数据库是数据库对象的集合数据库对象包括表Table、查询Query、窗体Form、报表Report、数据访问页Page、宏Macro和模块Module在任何时刻,Access2000只能打开并运行一个数据库但是,在每一个数据库中,可以拥有众多的表、查询、窗体、报表、数据访问页、宏和模块这些数据库对象都存储在同一个以MDB为扩展名的数据库文件中Access2000提供的这七种对象分工极为明确,从功能和彼此间的关系角度考虑,这七种对象可以分为三个层次第一层次是表对象和查询对象,它们是数据库的基本对象,用于在数据库中存储数据和查询数据第二层次是窗体对象、报表对象和数据访问页,它们是直接面向用户的对象,用于数据的输入输出和应用系统的驱动控制第三层次是宏对象和模块对象,它们是代码类型的对象,用于通过组织宏操作或编写程序来完成复杂的数据库管理工作并使得数据库管理工作自动化
1.
3.3Access与其他数据库的比较常用的数据库包括Access、Oracle、SQLServer、dBase等对于一般的系统设计,使用Access数据库较好,原因如下
1.相对其它数据库,AccessODBC驱动程序所支持的指令最齐全
2.AccessODBC驱动程序执行效率远高于其它ODBC驱动程序
3.微软主要的开发工具(VB、VC等)及应用程序(Office系列)均以ACCESS为数据库因此我们选用ACCESS数据库第2章系统需求分析需求分析的任务是确定系统必须完成的工作,也就是对目标系统提出完整、准确、清晰、具体的要求首先确定系统的综合需求,这些需求包括
1、功能需求
2、性能需求
3、环境需求
2.1软件需求分析
2.
1.1系统性能需求
1、数据精确度查询时应保证查全率,所有相应域包含查询关键字的记录都应能查到
2、时间特性一般操作的响应时间应在1-2秒内,对软磁盘和打印机及条形码刷卡服务响应时间也应在可接受的时间内完成
3、适应性对前面提到的运行环境要求不应存在困难
2.
1.2运行环境需求
1、硬件环境奔腾13316兆以上内存的pc机打印机可选
2、软件环境各WINDOWS操作系统
2.2用户需求分析
2.
2.1用户调查经过详细的调研,并多次与学生档案管理的老师进行研讨后,首先加深了对学生学籍管理业务的深刻了解,其次在从分熟悉学生学籍管理业务的同时,将整个学籍管理的业务流程描述如下1新生入校,首先报到并进行注册登记,然后到财务部门交费根据学生被录取的专业,持缴费单到所在系部注册2到系部注册后,根据选报专业分配到班级3进入正常的大学生活,参加各种教学活动,学期期末要求每位同学参加各科的期末考试4考试结束,由各系或部将每位同学的考试成绩及其他一些相关信息记录至每个同学的档案中根据以上总结,得出其现行的业务流程如图2-1所示办理登记手续至系或部安排课程档案信息开始学习活动图2-1现行学生学籍管理业务流程图
2.
2.2构造系统的逻辑模型构造系统的逻辑模型的工具是数据流图和数据字典数据流图中没有任何具体的物理元素,只是用来描述信息在系统中的流动和处理情况数据流图共有四种基本符号矩形表示数据的源点或终点(或称为外部项),圆或椭圆表示变换数据的处理,向右开口的矩形表示数据存储,箭头表示数据流,即特定数据的流动方向根据现行学生学籍管理的业务流程,首先确定数据流图中的源点和终点都选定为学生,如此就得到学籍管理系统的基本系统模型,如图2-2所示学生基本信息成绩等信息图2-2学生学籍管理系统的基本系统模型根据基本系统模型,对其逐步细化,得到描绘逻辑系统细化后的数据流图,如图2-3所示学生基本信息基本信息课程信息新生报到根据专业确定成绩信息所修课程班级信息毕业分档成绩信息图2-3学籍管理系统数据流图为了更进一步描绘系统的逻辑模型,在得出系统的数据流图后要对图中的数据信息进行如学生信息、学号、班级信息、课程信息、成绩等作进一步的描述,这就需要定义数据字典,才能把现有的系统描述清楚数据字典是关于数据信息的集合,也就是对数据流图中包含的所有元素的定义的结合一般来说,数据字典应该由四类元素的定义组成数据流、数据流分量(即数据元素)、数据存储、数据处理图2-4给出了系统的主要数据元素的数据字典卡片,以具体说明数据字段卡片中相关数据的含义图2-4(a)图2-4(b)图2-4(c)图2-4(d)图2-4(e)图2-4(f)图2-4(g)图2-4系统主要数据元素的数据字典
2.
2.3系统功能需求通过多方了解和调查,在现行的业务处理流程和数据流图的基础上,就可以基本确定目标系统要达到的目标了在经过多方了解和调查后,基本清楚了学籍管理系统的功能需求,即系统开发的总体任务是实现学生信息的系统化、规范化和自动化系统功能分析是在系统开发的总体任务的基础上完成的此学籍管理系统需要完成的功能主要有1数据添加功能对于新生报到,系统必须具有班级的建立、课程的设置,如果新增专业,则能添加新专业,期末学生的考试成绩及奖惩信息必须能够录入2数据修改功能当上述资料发生变化或有错误信息输入时,应能够及时对数据进行修改和补充3数据删除功能当学生毕业、转学或退学后,可删除该生的相关信息4数据查询功能该系统的主要功能之一即根据用户提供的相关信息,能够及时查找出对应的学生信息,系统应该提供多种查询方法,以便满足用户的不同需求5数据打印功能学生基本信息和成绩录入后应可以打印出来形成文字档案,转入学生档案,这也是学籍管理系统必须具备的功能第3章学籍管理系统的概要设计为了实现目标系统,最终必须设计出组成这个系统的所有程序和数据库,对于程序,则首先进行结构设计,具体设计方法如下
(1)采用某种设计方法,将一个复杂的系统按功能划分成模块
(2)确定每个模块的功能
(3)确定模块之间的调用关系
(4)确定模块之间的接口,即模块之间传递的信息系统的概要设计是以模块为基础的,在需求分析阶段,通过某种分析方法把系统分解成层次结构在设计阶段,以需求分析的结果为依据,从实现的角度划分模块,并组成模块的层次结构
3.1模块的划分及功能描述根据系统需求,结合实际情况,经过分析,系统应包括以下几个方面
1、用户类型本系统的用户分为两类超级用户,只读用户和普通用户对于超级用户,即整个系统的管理人员,他可以对系统中的所有的学生信息进行浏览、查找,而且可添加、修改和删除学生记录,也可以使用相应的报表功能只读用户是指当前系统中所有信息的查阅者,该类用户只能对所有的信息进行浏览,查询,不能对系统信息进行添加、删除、修改等管理普通用户只有其特定的权限,通过设置其权限,可以使同超级用户一样管理整个系统,也可以使其只对系统或学生档案与班级或课程与成绩进行管理
2、信息浏览对于所有用户,都能够浏览所有信息,而且系统中提供了多种浏览方式按所在专业浏览和按所在班级浏览在浏览过程中如果对自身信息有问题,不能自行修改其中有误的信息,必须向系统管理人员报告,只有系统管理人员才能对其信息进行修改
3、查询此部分功能对所有用户开放如果浏览部分所提供的浏览方式不能满足管理人员的要求,那么用户可在现有的信息中进行查找,以便找到满足条件的学生信息,以便进行浏览该部分的功能提供了对所有的字段进行精确或者模糊查找的功能
4、学生信息管理此部分功能只对超级用户开放如果学生基本信息改变,或学生有所变更,那么超级用户可根据具体情况,对学生进行管理,可添加、删除或者修改某个学生的信息数据流名学生名册别名组成学号+姓名+性别+政治面貌+班级+专业+出生日期+家庭地址+联系电话+邮政编码备注
5、报表此部分功能只对超级用户和普通用户开放他们在查看学生信息的同时,可对学生基本信息进行报表输出和打印根据以上分析,在此将本学生学籍管理系统分为用户管理、学生信息管理、班级管理、班级课程管理和成绩管理五个功能模块
(1)用户管理模块主要对使用本系统的用户进行如下管理◇添加新用户◇对已有的用户进行更改密码◇重新登录本模块只有超级用户才能使用,学生用户不能进入
(2)学生信息管理模块主要是对学生信息(如学号、姓名、性别、家庭住址等)进行管理本模块又分为五个子模块◇录入学生信息◇查询学生信息◇修改/删除学生信息◇打印学生信息录入学生信息模块http://www.fjnhsx.com/sdms/InfoInput.asp录入学生的学号、姓名、性别、政治面貌、班级、专业、家庭地址、邮政编码、出生日期、联系电话等信息 录入第一条记录后,系统会自动进入下一学号的录入页面(学号自动加一),减轻了手工劳动并避免了许多错误的发生 若录入的学号或自动加一生成的学号与数据库中的记录重复,则会自动转入修改页面修改完成后同样也会自动进入下一学号录入页面本模块只有超级用户才能使用,学生用户不能进入查询学生信息模块http://www.fjnhsx.com/sdms/InfoQuery.asp 可从学号、姓名、所在班级或专业四种查询方法任选其一进行查询学生信息 支持模糊查询! 例如在姓名中输入“小”,则查询结果为姓名中包含有“小”的学生修改/删除学生信息模块http://www.fjnhsx.com/sdms/InfoModifyDel.asp 首先使用查询功能查询出需要修改/删除的记录,然后进行修改/删除操作 可以批量删除记录打印学生信息模块 将查询结果以我们常见的成绩表形式打印出来,并可以自定义打印格式
(3)班级管理模块主要是对学生所在班级进行管理本模块分为三个子模块◇添加班级◇浏览班级信息◇修改/删除班级
(4)班级课程管理模块主要是对学生所在班级课程进行管理本模块分为两个子模块◇添加基本课程◇设置班级课程信息
(5)学生成绩管理模块主要是对学生成绩进行管理本模块又分为六个子模块◇录入学生成绩◇查询学生成绩◇修改/删除学生成绩◇打印学生成绩◇计算总分录入学生成绩http://www.fjnhsx.com/sdms/ScoreInputStep
1.asp模块 录入某次考试中一科或多科的成绩查询学生成绩http://www.fjnhsx.com/sdms/ScoreQueryStep
1.asp模块 提供三种方式查询学生成绩按学号查询、按姓名查询和按班级查询按学号和姓名查询是指首先选择要查询的学生的学号和姓名,然后查询这一次考试中的某一科或多科的成绩,这种方式适合某一次考试的横向比较;按班级查询是指首先选择要查询成绩的某一班,然后查询这个班的某次或多次考试的成绩,这种方式适合于科任老师对所有学生的成绩进行纵向比较和评估学生成绩修改/删除http://www.fjnhsx.com/sdms/ScoreModifyDel.asp模块 修改/删除某次考试中某个学生的成绩计算总分http://www.fjnhsx.com/sdms/ScoreOrder.asp模块自动计算各科总分其中,学生成绩查询不需登录即可使用在这几个主模块中,我主要负责登录管理、学生档案管理和班级管理这三个模块的设计
3.2概念模型设计通过需求分析我们已经基本了解了用户对处理的要求,下面我们将分析用户对数据的要求为了把用户的数据清晰明确的表达出来,系统分析员通常建立一个概念性的数学模型概念性数学模型是一种面向问题的数学模型,是按用户的观点来对数据和信息建模最常用的表示概念性数据模型的方法是实体-联系方法(Entity-RelationshipApproach)这种方法用E-R图描述现实世界中的实体,而不涉及这些实体在系统中的实现方法,该方法又称为E-R模型E-R图中共有三种符号实体、属性和联系通常实体用矩形来表示,属性用椭圆或圆角矩形来表示,联系用菱形来表示联系又分为一对
一、一对多和多队多三种类型
3.
2.1数据库建模经过上面的分析,能够提取出以下几个实体学生、课程、班级等他们的实体图分别如图3-
1、图3-
2、图3-3所示图3-1学生实体图图3-2课程实体图图3-3班级实体图在找出所有实体的基础上,需要进一步分析各实体之间的联系经过分析两两实体间的联系,然后进行合并,得出所有实体的联系及E-R图,如图3-4所示图3-4学籍管理的E-R图在以上的E-R图中可以看到,学生和课程两个实体之间联系的类型是多对多的,其他实体之间的联系类型都属于一对一或一对多的联系
3.
2.2关系描述的设计根据以上各实体图和学籍管理系统的E-R图,经过转换,可以导出各个关系其转换规则为首先每个实体应转换为一个关系,有属性的联系也应转化为一个关系,然后需要给出每个关系的关键字根据以上规则,直接得出所有关系学生(学号、姓名、性别、政治面貌、出生日期、专业、班级、家庭住址、联系电话、邮政编码、备注)关键字为学号课程(课程号、课程名、类型)关键字为课程号班级(班级、专业、年制、所属系、班主任、人数)关键字为班级成绩(学号、姓名、班级、学期、课程名、成绩)关键字为学号和课程名在考虑系统安全的前提下,需要增加用户关系和使用关系,其关系模式如下用户(用户名、密码、用户ID)关键字为用户名
3.3软件系统结构的设计
3.
3.1得出新的业务流程根据系统分析得到的现行业务处理流程,在反复的研究后,首先得到目标系统即学籍管理系统的业务流程,其处理流程如图3-5所示系统登录新生报到分班并开始学习退出登录考试图3-6学籍管理系统的业务流程针对新的处理流程,现具体描述如下1用户登录对系统进行初始化设置,包括对专业、课程和班级的设置2新生报到按专业分班进行教学,并为每位新同学分配学号,然后对学生基本信息进行录入3学生分配到班级、领教材开始新的大学生活4用户对学生在校期间得到的奖惩信息进行记录,并可以对基本信息发生变化的学生在系统中进行修改5期末考试结束用户把每个学生的考试成绩进行录入、修改、查询
3.
3.2系统功能结构图根据系统分析阶段得到的数据流图,采用软件设计的概念和原理,在反复的研究后,在保证系统基本功能要求的前提下,结合系统新的业务流程确定系统必须具备的所有功能,由此得出学籍管理系统的系统功能结构图,如图3-7所示图3-7学籍管理系统功能结构图
3.4数据库的设计在需求分析阶段已完成了系统的数据分析根据数据分析阶段建立的概念模型,已经得出满足第三范式的若干关系描述,该阶段的主要工作就是把前一阶段的成果转化为具体的数据库数据库的设计指数据存储文件的设计,一般把数据库的设计分为数据库的逻辑设计和数据库的物理设计两个步骤
3.
4.1数据库的逻辑设计数据库的逻辑设计即把得到的满足第三范式的关系转化为特定的数据库管理系统下的数据表根据前面得到的各个关系,现把它们转化为数据表1学生信息表学号、姓名、性别、政治面貌、出生日期、专业、班级、家庭住址、联系电话、邮政编码、备注此表共有11个字段,由于在校所有学生中,不可能存在两个学生的学号相同,所以在本表中学号作为学生信息表的主键2课程信息表课程号、课程名、类型此表以课程号为主键3班级信息表班级、专业、年制、所属系、班主任、人数此表共有6个字段,以班级名为主键,用于记录学生所在班级的信息4成绩表学号、姓名、班级、课程名、学期、成绩此表共有6个字段,以学号和课程名共同为主键,用于记录学生在校期间的各科考试成绩5用户表用户名、密码、用户ID此表用于系统对操作员的设置
3.
4.2数据库的物理设计在完成数据库的逻辑设计后,即可开始数据库的物理设计基于以上数据库的逻辑设计,考虑程序设计的简易性及通用性,本学籍管理系统采用迷Microsoft的Access2000数据库,并在其下创建数据表,其结构分别如下
①学生信息表,共有11个字段,分别为学号、姓名、性别、政治面貌、出生日期、专业、班级、家庭住址、联系电话、邮政编码、备注见表3-1表3-1学生信息表结构字段名数据类型字段长度与格式关键字学号文本10是姓名文本10否性别文本5否政治面貌文本5否出生日期日期型YYYY-MM-DD否专业文本50否班级文本50否家庭住址文本50否邮政编码文本10否联系电话文本15否备注文本50否
②课程信息表,本表有3个字段课程号、课程名、类型见表4-2表3-2课程信息表的结构字段名数据类型字段长度与格式关键字课程号文本10是课程名文本10否类型文本10否
③班级信息表,共有5个字段班级、专业、所属系、班主任、人数见表3-3表3-3班级信息表的结构字段名数据类型字段长度与格式关键字班级文本50是专业文本50否年制文本5否所属系文本20否班主任文本10否人数文本3否
④成绩信息表,共有5个字段分别为学号、姓名、课程名、学期、成绩见表4-4表3-4成绩信息表的结构字段名数据类型字段长度与格式关键字学号文本10是姓名文本10否班级文本20否课程名文本10是学期文本10否成绩文本10否第4章学籍管理系统详细设计在系统的概要设计中,已将系统划分为多个模块,并将它们按照一定的原则组装起来,同时确定了每个模块的功能及模块与模块之间的外部接口详细设计主要是确定每个模块具体执行过程
4.1系统框图经过需求分析与概要设计,现可得出系统的模块结构图,如图4-1所示图4-1软件系统的模块结构图
4.2程序流程图根据软件系统的模块结构图,可得出相应的程序流程图,如图4-2所示图4-2软件系统主程序的程序流程图第5章系统的实现
5.1系统界面的设计系统的实现对本系统而言即是用VisualBasic
6.0编写程序完成系统的所有功能以下分模块来介绍系统各窗体的设计
5.
1.1登录窗体的设计在窗体上主要布置两个标签、两个文本框、两个命令按钮,分别设置它们的属性窗体标题为“登录”,两个标签的标题分别为“用户名”和“密码”,命令按钮的标题分别为“立即登录”和“退出登录”设置后的界面如图5-1所示图登录界面图5-1系统登录窗体的设置图
5.
1.2系统主窗体的设计首先,在窗体上一个状态栏控件,使用状态栏前必须打开“工程”→“部件”对话框,选择“MicrosoftWindowsCommonControls
6.0”将控件添加到工具箱,然后在状态栏属性的窗格设计中插入四个窗格,并分别填写文本;其次,打开菜单编辑器,按照总体设计的功能结构图设置菜单项,如图5-2所示,设置后的主窗体界面如图5-3所示图5-2菜单编辑器主窗体图5-3主窗体的设置效果图
5.
1.3系统用户管理模块的设计用户管理模块只有合法的管理员,即超级用户,才能对此模块进行操作,他可以添加新的用户,也可以对已有用户的密码进行修改
1、添加用户首先,在窗体上布置两个命令按钮、三个文本框、三个单选框和三个复选框,其设置效果如图5-4所示图新增用户图5-4用户管理的设置效果图通过运行此窗体,可以添加新的用户,并可以通过单击单选框来确定用户类别,并设置相应的权限如选择超级用户,则复选框自动被全选中,即用户可以对系统所做的任何操作都不受任何限制;如选择只读用户,这用户只可以对系统中的信息进行浏览和查询,不可以对其进行修改、删除等操作;如选择普通用户,则可以通过对复选框的选择来确定用户的管理权限
2、修改密码在这个窗体中放置了四个标签、四个文本框和两个命令按钮其中四个标签的标题分别为“请输入用户名”、“请输入旧密码”、“请输入新密码”和“请确认新密码”,两个命令按钮的标题为“确认”和“取消”设置界面如图5-5所示修改密码时需输入需要修改的用户名和密码,然后输入新密码,并对输入的新密码进行确认,确认一致后,将出现对话框提示“密码修改成功”,而且会把修改后的结果送入数据表中图5-5修改密码界面
5.
1.4学生档案管理模块的设计学生档案管理模块分为3个之模块添加/修改学生档案浏览学生档案查询学生档案
1、添加学生档案模块的设计通过此模块可以添加学生的学号、姓名、性别、政治面貌、班级、专业、家庭地址、邮政编码、出生日期、联系电话等信息 学生档案的添加是按学号进行的,一般新生报到后,由教务处根据学生所在专业分配学号,然后依次把学生档案输入到相应的数据表中,供以后进行其他数据的处理,如成绩的输入、档案的查询、浏览等使用当录入第一条记录后,系统会自动进入下一学号的录入页面此模块的界面设计如图5-6所示图5-6添加学生档案界面
2、浏览学生档案模块的设计首先,在窗体中放置一个工具栏、一个数据网格控件、一个TreeView和两个ImageList工具栏已在添加状态栏的同时被添加道工具箱中,首先在工具栏属性的按钮设置中插入四个按钮,并分别设置其标题为“查找”、“修改”、“删除”、“打印”;数据网格、TreeView和ImageList在使用前应先通过“工程”→“部件”选择“MicrosoftWindowsCommonControls-
6.0”添加到工具箱中;工具栏中的图片通过ImagiList的属性页对话框选择“图像”标签来添加,其界面设置如图5-7所示学生档案的浏览是按学生所在专业和班级进行浏览,当单击TreeView时数据网格中显示相应专业的所有学生的信息,而双击时则显示相应班级所有学生的信息,如果需对学生信息进行修改,则点击工具栏上的修改按钮,打开图5-6所示界面,即可对学生信息进行修改图5-7学生档案浏览界面
3、学生档案查询模块的设计学生档案查询窗体主要有五个文本框和两个命令按钮,如图5-8所示在此界面中,用户可以分别按照学号、姓名、班级、专业和姓名关键字进行查询学生信息输入相关信息后,点击“确定”命令按钮,可打开如图5-7所示的窗体,且在数据网格中显示所要查询的结果图学生档案查询图5-8学生档案查询界面
5.
1.5班级管理模块的设计班级管理模块有分为3个之模块添加班级浏览班级查询班级
1、添加班级模块的设计添加班级的窗体设计如图5-9所示,选择“班级管理|添加班级”菜单即可打开此窗体通过此模块可以添加班级信息,并将信息输入到相应的数据表中图添加班级图5-9添加班级界面图
2、班级浏览模块的设计班级浏览界面的设置如同学生档案浏览的设置,其界面图如5-10在此窗体中,通过单击TreeView将在数据网格中显示相应专业的所有班级的信息,而双击时则显示相应班级的所有相关信息如果需对班级信息进行修改,则点击工具栏上的修改按钮,打开图5-9所示界面,即可对班级信息进行修改图5-10班级浏览界面图
3、班级查询模块的设计班级查询界面设置如图5-11所示通过输入班级、专业和班主任的信息即可查到所在班级的相关信息,其结果显示在图5-10的数据网格中图班级查询图5-11班级查询界面图
5.2数据库的链接系统界面设计完成后,可开始编写程序以实现系统的具体功能此学籍管理系统的数据库链接采用ADO的代码建立链接对象完成数据库的链接在使用ADO对象之前,必须先利用VisualBasic菜单的“工程”→“引用”来引用“MicrosoftActiveDataObjects
2.6Library”,然后ADO对象群中Connection、Recordset、Command、Fields等对象才会成为可以引用的对象否则,类似下面的语句DimmrcasnewADODB.ConnectionDimmrcasnewADODB.Recordset都会产生“用户定义类型未定义”的错误,因为“Connection”和“Recordset”都是定义在“MicrosoftActiveDataObjects
2.6Library”中的如果没有事先将其引用的话,VisualBasic将无法辨识它们代码的编写请参看“附录”第6章结论通过这次毕业设计,我对四年所学的知识有了一个完整、系统的认识这不仅巩固了自己以前所学的知识,而且还熟悉了对VisualBasic
6.0应用软件的应用及开发一个管理系统的基本要领、设计步骤和必要的知识,学会了熟练地应用其软件及查阅工具书在设计过程中,我体会到了设计的艰辛与快乐,只有不断地学习,把课本上所学的知识同实际联系起来,才能不断提高自身的能力经过一个多月的努力,我们虽然完成了毕业设计的任务但由于时间仓促,我们又缺乏设计经验,不能完整的把所学知识加以应用,难免会出现一些错误,望各位老师批语指正通过这次我们组员共同合作完成的设计任务,我们懂得了设计的真正目的和任务及合作的重要性,培养了自己动手工作的能力参考文献
[1]刘瑞新.VisualBasic管理信息系统开发毕业设计指导.北京:机械工业出版社,2005
[2]刘韬,骆娟,何旭洪.人民邮电出版社,2003
[3]龚沛曾,陆慰民,杨志强.VisualBasic程序设计教程北京高等教育出版社,2000
[4]曾强聪.VisualBasic程序设计教程中国水利水电出版社,2003
[5]孙建中,周龙.计算机专业英语中国水利水电出版社2002
[6]邓良松,刘海岩,陆丽娜.软件工程西安电子科技大学出版社,2003计算机语言VisualBasic
6.0语言新特征像以前的版本一样,VB
6.0它语言本身变成了语言发展环境的核心它增加了许多新的功能,当公用模块,方法或功能使用时特定的数据类型提供了很多灵活性公用模板和方法能够使用用户自定义类型作为变量或返回值同样的,功能和模块能返回这将不再怀疑那些已经发现VB有可能被传给的数据类型中和从程序受限制的好消息控件在VB
6.0也已经被提高明确地产生事件功能除了创造普通的事件,现在可以创建一个可选择的机器名而且产生在远程的系统上StrConv功能能在运行的过程中做不同的转变它已经与一个被称为LCID的可选择的变量一起延伸LCID变量使你能够为线叙述LocaleIDVB
6.0中增添了许多新的事件类型文件系统控件或文件系统对象这些事件包括一些方法可以比目录更快速和容易因为他们从手写体语言开始所以FSO组对VB脚本程序师可能是熟悉的在某的情况VB
6.0将能够对数组进行赋值尽管被复制的数组是大小可变的或大小固定的只有可变的数组能放在任务的左边VB的模块你可以在VB中创建自己的模块用类模块模块包括以下类型属性,这些元素用来分配并且取回模块中的值方法,这些公用的功能在模块中被定义事件,正如控制能在窗体中产生事件来自你的模块中产生的事件在它的本身包含这个事件类模块也可以包含两个自身的特殊的事,初始化和终止初始值事件在一个新的模块被创建时被触发,终止值事件在事件被破坏时产生事件定义也在类模块中被创建一个类模块是一个标准的代码模块,他仅包含公用事件和私有事件没有类模块的使用接口但是,一个模块能在工程窗体中被使用,正如一个普通的代码模块类模块有许多使用方法,如在VB工程中,一个类模块提供一个方法在产生事件的任何地方不使用全局的变量你能创建ActiveX控件而且编译他们通过DLL或EXE使其他的程序也能使用这些代码部件比如,你可以把所有的定义规则放在模块中并用ActiveDLL部件进行编译其他程序能参考DLL并在应用中使用这些规则你可以在VB中建立一个附加项,来提高VisualBasicIDE的功能数据库微软Access微软Access是一个有力的窗口并方便使用者的数据库管理系统它提供标准的数据管理特征给数据的储藏和调用但是使用图形工具可以通过Windows环境制造使任务运行更容易Access数据库管理系统软件以及发展了很多年它被设计来使使用者的数据库管理工作能充分利用窗口环境,当剩余的使用者对其它程序规划的时候Access支持对象链接与嵌入和动态数据交换,能将图形和文本加载到窗体和报表中产品提供一个图形用户接口,正如你从这一个市场的任何代表产品期待的那样报表,窗体和查询能够很容易的被设计并且运行因为有一个技术上的倾斜个体你将会感激宏功能和这种全图像的产品规划能力Access基础是支援一些使用者已经同过使用快速基础而精通的程序语言Access使数据库管理更容易通过扩展项目特征和后台处理,你能增添窗体和报表致谢本人在设计(论文)期间都是在孙力群老师全面、具体指导下完成进行的孙力群老师渊博的学识、敏锐的思维、民主而严谨的作风使学生受益非浅,并终生难忘感谢我的班主任和所有的代课老师四年来对我的关心和指导感谢我的学友和朋友对我的关心和帮助附录公用模块的代码PublicmodiAsBooleanPublicclassmodiAsBooleanPubliccjmodiAsBooleanPublictxtsqlAsStringPublicfindAsBooleanPublicclassfindAsBooleanPublicusernameAsStringPublicqxstrAsStringPublicFunctionExecuteSQLByValsqlAsStringAsADODB.RecordsetDimmyconAsADODB.ConnectionDimrstAsADODB.RecordsetSetmycon=NewADODB.Connectionmycon.ConnectionString=connstringmycon.OpenDimstokensAsStringOnErrorGoToexectuesql_errorstokens=SplitsqlIfInStrINSERDELETEUPDATEUCasestokens0Thenmycon.ExecuteSQLElseSetrst=NewADODB.Recordsetrst.OpenTrimsqlmyconadOpenKeysetadLockOptimisticSetExecuteSQL=rstEndIfexectuesql_exit:Setrst=NothingSetmycon=NothingExitFunctionexectuesql_error:Resumeexectuesql_exitEndFunctionPublicFunctionconnstringAsStringconnstring=provider=Microsoft.Jet.OLEDB.
4.0;Datasource=App.Path/xs.mdbEndFunctionPublicFunctionExecuteqxByValtxtAsIntegerAsStringDimsqlAsStringDimmyconAsADODB.ConnectionDimrstAsADODB.RecordsetSetmycon=NewADODB.Connectionmycon.ConnectionString=connstringmycon.OpenSetrst=NewADODB.Recordsetsql=selectadminfromusewhereusername=usernamerst.OpenTrimsqlmyconadOpenKeysetadLockOptimisticIfrst.EOF=TrueThenMsgBox非法用户vbExclamation+vbOKOnly警告Executeqx=nothingExitFunctionEndIfIfrst.Fields0=yThenExecuteqx=adminExitFunctionEndIfrst.Closesql=selectreadonlyfromusewhereusername=usernamerst.OpenTrimsqlmyconadOpenKeysetadLockOptimisticIfrst.Fields0=yThenExecuteqx=readonlyExitFunctionEndIfSelectCasetxtCase1sql=selectqx1fromusewhereusername=usernameCase2sql=selectqx2fromusewhereusername=usernameCase3sql=selectqx3fromusewhereusername=usernameEndSelectOnErrorGoToexectuesql_errorSetrst=NewADODB.Recordsetrst.OpenTrimsqlmyconadOpenKeysetadLockOptimisticIfrst.Fields0=yThenExecuteqx=trueElseExecuteqx=falseEndIfexectuesql_exit:Setrst=NothingSetmycon=NothingExitFunctionexectuesql_error:Resumeexectuesql_exitEndFunction主窗体的代码:PrivateDeclareFunctionSetWindowPosLibuser32ByValhwndAsLongByValhWndInsertAfterAsLongByValXAsLongByValYAsLongByValcxAsLongByValcyAsLongByValwFlagsAsLongAsLongDimfind1AsIntegerDimliulan1AsIntegerPrivateSubabout_ClickLoadfrmSplashfrmSplash.mbAbout=TruefrmSplash.ShowvbModalEndSubPrivateSubadd_Clickqxstr=Executeqx2Ifqxstr=falseOrqxstr=readonlyThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfForm
2.Showmodi=FalseForm
2.ZOrder0EndSubPrivateSubcjadd_Clickqxstr=Executeqx3Ifqxstr=falseOrqxstr=readonlyThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIffrmcj
2.Showcjmodi=Falsefrmcj
2.ZOrder0EndSubPrivateSubcjbrowse_Clickqxstr=Executeqx3Ifqxstr=falseThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIffrmcj
1.Showfrmcj
1.ZOrder0EndSubPrivateSubcjfind_Clickqxstr=Executeqx3Ifqxstr=falseThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfFrmcj
3.ShowFrmcj
3.ZOrder0Frmcj
3.Text
1.SetFocusEndSubPrivateSubclaasfind_Clickqxstr=Executeqx2Ifqxstr=falseThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfForm
4.ShowForm
4.ZOrder0i=SetWindowPosForm
4.hwnd-100003EndSubPrivateSubclassapp_Clickqxstr=Executeqx2Ifqxstr=falseOrqxstr=readonlyThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfFormclass
1.Showclassmodi=FalseFormclass
1.classloadFormclass
1.ZOrder0EndSubPublicSubclabrowsetxtsql=select*frombjFormclass
2.ZOrder0Formclass
2.Caption=浏览班级设置Formclass
2.classshowtitleFormclass
2.classshowdataEndSubPrivateSubclassbrowse_Clickqxstr=Executeqx2Ifqxstr=falseThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfFormclass
2.ShowEndSubPrivateSubclassfind_Clickqxstr=Executeqx2Ifqxstr=falseThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfFormclass
3.ShowFormclass
3.ZOrder0Formclass
3.Text
10.SetFocusEndSubPrivateSubclasskecheng_Clickqxstr=Executeqx3Ifqxstr=falseThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfFrmclasskecheng
1.ShowFrmclasskecheng
1.ZOrderEndSubPrivateSubdenglu2_Clickfrmdenlu.ShowUnloadMeEndSubPrivateSubjibenkecheng_Clickqxstr=Executeqx3Ifqxstr=falseThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIffrmjiben.Showfrmjiben.ZOrder0EndSubPrivateSubliulan_Clickqxstr=Executeqx2Ifqxstr=falseThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIffind=FalseForm
3.ShowEndSubPrivateSubMDIForm_Loadusername=0001DataEnvironment
1.Connection
1.ConnectionString=connstringStatusBar
1.Panels
2.Text=日期NowStatusBar
1.Panels
3.Text=当前用户usernameDimaaAsStringSelectCaseExecuteqx1Caseadminaa=”超级用户Casereadonlyaa=只读用户CaseElseaa=普通用户EndSelectStatusBar
1.Panels
4.Text=状态aaEndSubPrivateSubuseradd_Clickqxstr=Executeqx1Ifqxstr=falseOrqxstr=readonlyThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIffrmuser
1.Showfrmuser
1.ZOrder0EndSubPrivateSubusermodi_Clickqxstr=Executeqx1Ifqxstr=falseOrqxstr=readonlyThenss=MsgBox对不起,您没有管理本模块的权限,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfForm
1.ShowForm
1.ZOrder0EndSub登录窗体的代码PrivateSubCommand1_ClickDimmrcAsADODB.Recordsettxtsql=selectusernamefromusewhereusername=TrimText
1.TextSetmrc=ExecuteSQLtxtsqlIfmrc.EOF=TrueThenMsgBox用户名错误vbExclamation+vbOKOnly警告Text
1.SetFocusText
1.SelStart=0Text
1.SelLength=LenText
1.TextExitSubEndIfusername=mrc.Fields0txtsql=selectusernamefromusewherepassword=TrimText
2.TextSetmrc=ExecuteSQLtxtsqlIfmrc.EOF=TrueThenMsgBox密码错误vbExclamation+vbOKOnly警告Text
2.SetFocusText
2.SelStart=0Text
2.SelLength=LenText
2.TextExitSubEndIfMDIForm
1.ShowUnloadMeEndSubPrivateSubCommand2_ClickUnloadMeEndSubPrivateSubForm_ActivateText
1.SetFocusEndSubPrivateSubText1_KeyPressKeyAsciiAsIntegerIfKeyAscii=13ThenText
2.SetFocusEndIfEndSubPrivateSubText2_KeyPressKeyAsciiAsIntegerText
2.PasswordChar=*IfKeyAscii=13ThenCommand
1.SetFocusEndIfEndSub入学登记窗体的代码Dimtxtsql1AsStringPrivateSubCombo1_ClickIndexAsIntegerDimmrcAsADODB.Recordsettxtsql1=select专业formbjwhere班级=TrimCombo
11.TextSetmrc=ExecuteSQLtxtsqltxtsql1=select班级frombjwhere专业TrimCombo
13.TextSetmrc=ExecuteSQLtxtsqlmrc.CloseEndSubPrivateSubCombo1_KeyPressIndexAsIntegerKeyAsciiAsIntegerIfKeyAscii=13ThenSendKeys{TAB}EndIfEndSubPrivateSubCommand1_ClickForj=0To5IfText1j=Thenss=MsgBoxLabel1j.Caption不能为空vbExclamation+vbOKOnly警告Text1j.SetFocusText1j.SelStart=0Text1j.SelLength=LenText1j.TextExitSubEndIfNextDimmrcAsADODB.Recordsettxtsql1=select*fromxjwhere学号=TrimText
10.TextSetmrc=ExecuteSQLtxtsql1Ifmodi=FalseThenIfmrc.EOF=FalseThensss=MsgBox已存在改学号的记录,学号不能重复vbExclamation+vbOKOnly警告Text
10.SetFocusText
10.SelStart=0Text
10.SelLength=LenText
10.Textmrc.CloseExitSubEndIfEndIfIfNotIsDateText
12.TextThenssss=MsgBox应输入日期yy-mm-ddvbInformation+vbOKOnly警告Text
12.SetFocusText
12.SelStart=0Text
12.SelLength=LenText
12.TextExitSubEndIfIfmodi=TrueThentxtsql1=updatexjset学号=TrimText
10.Text姓名=TrimText
11.Text性别=TrimCombo
10.Text班级=TrimCombo
11.Text出生日期=#TrimText
12.Text#家庭住址=TrimText
13.Text邮政编码=TrimText
14.Text联系电话=TrimText
15.Text备注=TrimText
17.Textwhere学号=TrimForm
3.MSF
1.TextMatrixForm
3.MSF
1.Row1Setmrc=ExecuteSQLtxtsqltxtsql1=updatecjset学号=TrimText
10.Textwhere学号=TrimForm
3.MSF
1.TextMatrixForm
3.MSF
1.Row1UnloadMeExitSubEndIftxtsql1=select*fromxjSetmrc=ExecuteSQLtxtsql1mrc.AddNewFori=6To10mrc.Fieldsi=Text1i-
4.TextNextimrc.Fields0=TrimText
10.Textmrc.Fields1=TrimText
11.Textmrc.Fields2=TrimCombo
10.Textmrc.Fields3=TrimCombo
12.Textmrc.Fields4=TrimCombo
11.Textmrc.Fields5=TrimCombo
13.Textmrc.UpdateSetmrc=NothingForj=1To6Text1j=NextText
10.Text=Text
10.Text+1EndSubPrivateSubCommand2_ClickUnloadMeEndSubPrivateSubForm_ActivateText
10.SetFocusForm
2.load1EndSubPublicSubload1DimmrcAsADODB.Recordsettxtsql1=selectDISTINCT班级frombjorderby班级Setmrc=ExecuteSQLtxtsql1Ifmrc.EOFThenddd=MsgBox先设置班级部署警告mrc.CloseExitSubEndIfCombo
11.Clearmrc.MoveFirstDoWhileNotmrc.EOFCombo
11.AddItemmrc.Fields0mrc.MoveNextLoopCombo
11.ListIndex=0Combo
10.ListIndex=0IfmodiThenMe.Caption=修改txtsql1=select*fromxjwhere学号=TrimForm
3.MSF
1.TextMatrixForm
3.MSF
1.Row1Setmrc=ExecuteSQLtxtsql1mrc.MoveFirstFori=6To10Text1i-
4.Text=mrc.FieldsiNextiText
10.Text=mrc.Fields0Text
11.Text=mrc.Fields1Combo
10.Text=mrc.Fields2Combo
11.Text=mrc.Fields3Combo
12.Text=mrc.Fields4Combo
13.Text=mrc.Fields5mrc.CloseElseMe.Caption=登记Fori=2To6Text1i.Text=NextiText
10.Text=Text
11.Text=EndIfEndSubPrivateSubText1_GotFocusIndexAsIntegerIfIndex=6ThenText
16.SelStart=0Text
16.SelLength=LenText
16.TextEndIfEndSubPrivateSubText1_KeyPressIndexAsIntegerKeyAsciiAsIntegerIfKeyAscii=13ThenSendKeys{TAB}EndIfEndSub浏览学生档案窗体的代码PublicprintstrAsStringPrivateDeclareFunctionSetWindowPosLibuser32ByValhwndAsLongByValhWndInsertAfterAsLongByValXAsLongByValYAsLongByValcxAsLongByValcyAsLongByValwFlagsAsLongAsLongPublicSubshowtitleMSF
1.ClearDimiAsIntegerWithMSF
1.Cols=
12.TextMatrix01=学号.TextMatrix02=姓名.TextMatrix03=性别.TextMatrix04=政治面貌.TextMatrix05=班级.TextMatrix06=专业.TextMatrix07=出生日期.TextMatrix08=家庭住址·.TextMatrix09=邮政编码.TextMatrix010=联系电话.TextMatrix011=备注.ColWidth0=
200.ColWidth1=
500.ColWidth2=
700.ColWidth3=
500.ColWidth4=
700.ColWidth5=
1000.ColWidth6=
1000.ColWidth7=
1000.ColWidth8=
900.ColWidth9=
1000.ColWidth10=
1000.ColWidth11=
6000.FixedRows=1Fori=1To
11.ColAlignmenti=0Nexti.FillStyle=flexFillSingle.Col=
0.Row=
0.RowSel=
1.ColSel=.Cols-
1.CellAlignment=
4.Row=1EndWithEndSubPrivateSubForm_ActivateIffind=TrueThenForm
4.ZOrderEndIfIffind=TrueThenExitSubElseIfmodi=TrueThenshowdataTreeView1_DblClickmodi=FalseElsetreeEndIfEndSubPublicSubshowdataDimjAsIntegerDimiAsIntegerDimmrcAsADODB.RecordsetSetmrc=NewADODB.RecordsetSetmrc=ExecuteSQLtxtsqlIfmrc.EOF=FalseThenmrc.MoveFirstWithMSF
1.Rows=
50.Row=1DoWhileNotmrc.EOF.Rows=.Rows+1Fori=1Tomrc.Fields.Count.TextMatrix.Rowi=mrc.Fieldsi-1Nexti.Row=.Row+1mrc.MoveNextLoopEndWithElseIffind=TrueThenForm
3.HideForm
4.Showzzz=MsgBox对不起,每有此学生的档案记录vbOKOnly查询Form
4.ZOrder0Form
4.Text
10.SetFocusEndIfEndIfSetmrc=NothingEndSubPrivateSubForm_UnloadCancelAsIntegerIffind=TrueThenfind=FalseForm
4.Text
10.SetFocusEndIfEndSubPublicSubtreeTreeView
1.Nodes.ClearDimnodexAsNodeDimmrcAsADODB.RecordsetDimmrc1AsADODB.RecordsetDimstrAsStringDimaAsStringa=专业TreeView
1.LineStyle=tvwRootLinesstr=selectdistinct专业frombjorderby专业Setmrc=ExecuteSQLstrstr=selectdistinct专业,班级frombjorderby专业,班级Setmrc1=ExecuteSQLstrmrc.MoveFirstDoUntilmrc.EOFmrc
1.MoveFirstSetnodex=TreeView
1.Nodes.addamrc.Fields011DoWhileNotmrc
1.EOFIfmrc
1.Fields0=mrc.Fields0ThenSetnodex=TreeView
1.Nodes.addatvwChildmrc
1.Fields122EndIfmrc
1.MoveNextLoopa=a1mrc.MoveNextLoopmrc
1.Closemrc.CloseSetmrc=NothingSetmrc1=NothingEndSubPrivateSubToolbar1_ButtonClickByValButtonAsMSComctlLib.ButtonSelectCaseButton.TagCasefindForm
4.ShowCasemodiIfTrimMe.MSF
1.TextMatrixMSF
1.Row1=Thensssss=MsgBox你还没有选择记录vbOKOnly+vbExclamation警告ExitSubElseqxstr=Executeqx2Ifqxstr=readonlyThenss=MsgBox对不起,你是只读用户,不能修改记录,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfmodi=TrueForm
2.ShowForm
2.ZOrder0EndIfCasedelDimmrcAsADODB.RecordsetDimintcountAsIntegerIfTrimMe.MSF
1.TextMatrixMSF
1.Row1=Thesssss=MsgBox你还没有选择记录vbOKOnly+vbExclamation警告ElseIfqxstr=readonlyThenss=MsgBox对不起,你是只读用户,不能删除记录,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfIfMsgBox确定删除学号为TrimMe.MSF
1.TextMatrixMSF
1.Row1的记录吗Chr10Chr13¸改操作会导致该学生成绩记录的丢失vbOKCancel+vbExclamation警告=vbOKThenintcount=Me.MSF
1.Rowtxtsql=delete*fromxjwhere学号=TrimMe.MSF
1.TextMatrixMSF
1.Row1Setmrc=ExecuteSQLtxtsqltxtsql=delete*fromcjwhere学号=TrimMe.MSF
1.TextMatrixMSF
1.Row1Setmrc=ExecuteSQLtxtsqlTreeView1_DblClickEndIfEndIfEndSelectEndSubPrivateSubToolbar1_ButtonMenuClickByValButtonMenuAsMSComctlLib.ButtonMenuSelectCaseButtonMenu.KeyCasedangIfTrimprintstr=Thensssss=MsgBox没有当前记录vbOKOnly+vbExclamation警告ExitSubEndIfIfDataEnvironment
1.rsCommand
1.State=adStateOpenThenDataEnvironment
1.rsCommand
1.CloseEndIfDataEnvironment
1.rsCommand
1.OpenprintstrIfDataEnvironment
1.rsCommand
1.EOF=TrueThensssss=MsgBox没有当前记录vbOKOnly+vbExclamation警告ExitSubEndIfDataReportclass.Show1CaseallIfDataEnvironment
1.rsCommand
1.State=adStateOpenThenDataEnvironment
1.rsCommand
1.CloseEndIfDataEnvironment
1.rsCommand
1.Openselect*fromxjIfDataEnvironment
1.rsCommand
1.EOF=TrueThensssss=MsgBox没有当前记录vbOKOnly+vbExclamation警告ExitSubEndIfDataReportclass.Show1EndSelectEndSubPrivateSubTreeView1_DblClickOnErrorGoTossIfTreeView
1.SelectedItem.Index=0ThenMSF
1.ClearExitSubEndIftxtsql=TreeView
1.Nodes.ItemTreeView
1.SelectedItem.Indextxtsql=select*fromxjwhere专业=txtsqlor班级=txtsqlor学号=txtsqlorderby专业,班级,学号printstr=txtsqlMe.Caption=浏览学生档案¸Me.showtitleMe.showdataExitSubss:MSF
1.ClearEndSub查询学生档案窗体的代码PrivateSubCommand1_ClickDimaaAsIntegertxtsql=IfTrimText
10.TextThenaa=1Iftxtsql=Thentxtsql=xj.学号=TrimText
10.TextElsetxtsql=txtsqlandxj.学号=TrimText
10.TextEndIfEndIfIfTrimText
11.TextThenaa=1Iftxtsql=Thentxtsql=xj.姓名=TrimText
11.TextElsetxtsql=txtsqlandxj.姓名=TrimText
11.TextEndIfEndIfIfTrimText
12.TextThenaa=1Iftxtsql=Thentxtsql=xj.班级=TrimText
12.TextElsetxtsql=txtsqlandxj.班级=TrimText
12.TextEndIfEndIfIfTrimText
13.TextThenaa=1Iftxtsql=Thentxtsql=xj.专业=TrimText
13.TextElsetxtsql=txtsqlandxj.专业=TrimText
13.TextEndIfEndIfIfTrimText
14.TextThenaa=1txtsql=txtsql=xj.姓名like%TrimText
14.Text%EndIfIfaa=0Thenss=MsgBox你至少要输入一个查询条件警告Text
10.SetFocusExitSubEndIfDimstrAsStringstr=select*fromxjwheretxtsqlDimmrcAsADODB.RecordsetSetmrc=ExecuteSQLstrIfmrc.EOF=TrueThenzzz=MsgBox对不起,没有此学生的档案记录vbOKOnly警告Form
4.ZOrder0Form
4.Text
10.SetFocusExitSubEndIftxtsql=selectxj.学号xj.姓名xj.班级xj.专业bj.班级xj.出生日期xj.家庭住址xj.联系电话xj备注fromxjinnerjoinbjonxj.班级=bj.班级wheretxtsqlorderbybj.班级descxj.学号descForm
3.printstr=txtsqlfind=TrueForm
3.ShowForm
3.Caption=学生档案查询结果Form
3.showtitleForm
3.showdataEndSubPrivateSubCommand2_ClickUnloadMeEndSubPrivateSubForm_Activatefind=TrueEndSubPrivateSubForm_LostFocusUnloadMeEndSubPrivateSubForm_UnloadCancelAsIntegerfind=FalseEndSubPrivateSubText1_KeyPressIndexAsIntegerKeyAsciiAsIntegerIfKeyAscii=39ThenKeyAscii=0EndIfEndSub添加班级窗体的代码DimclassstrAsStringPublicSubclassloadDimmrcAsADODB.RecordsetIfclassmodiThenMe.Caption=修改班级classstr=select*frombjwhere班级=TrimFormclass
2.MSF
1.TextMatrixFormclass
2.MSF
1.Row2Setmrc=ExecuteSQLclassstrmrc.MoveFirstFori=0To6Text1i.Text=mrc.FieldsiNextimrc.CloseElseMe.Caption=添加班级设置Fori=0To6Text1i.Text=NextiEndIfEndSubPrivateSubCommand1_ClickForj=0To5IfText1j=Thenss=MsgBoxLabel2j.Caption不能为空vbExclamation+vbOKOnly警告Text1j.SetFocusText1j.SelStart=0Text1j.SelLength=LenText1j.TextExitSubEndIfNextDimmrcAsADODB.RecordsetIfclassmodi=FalseThenclassstr=select*frombjwhere班级=TrimText
11.TextSetmrc=ExecuteSQLclassstrIfmrc.EOF=FalseThensss=MsgBox已存在该班级的设置,不能重复vbonly警告Text
11.SetFocusText
11.SelStart=0Text
11.SelLength=LenText
11.Textmrc.CloseExitSubEndIfEndIfclassstr=delete*frombjwhere班级=TrimText
11.TextSetmrc=ExecuteSQLclassstrclassstr=select*frombjSetmrc=ExecuteSQLclassstrmrc.AddNewFori=0To6IfText
16.Text=ThenText
16.Text=无EndIfmrc.Fieldsi=Text1i.TextNextimrc.UpdateIfclassmodiThenUnloadMeElseForj=0To6Text1j=NextEndIfEndSubPrivateSubCommand2_ClickUnloadMeEndSubPrivateSubForm_ActivateText
10.SetFocusEndSub浏览班级信息窗体的代码PublicprintstrAsStringPublicSubclassshowtitleDimiAsIntegerMSF
1.ClearWithMSF
1.Cols=
8.TextMatrix01=专业.TextMatrix02=班级.TextMatrix03=年制.TextMatrix04=所属系.TextMatrix05=班主任.TextMatrix06=人数.TextMatrix07=备注.ColWidth0=
100.ColWidth1=
1300.ColWidth2=
1200.ColWidth3=
800.ColWidth4=
800.ColWidth5=
800.ColWidth6=
800.ColWidth7=
5000.FixedRows=1Fori=1To
7.ColAlignmenti=0Nexti.FillStyle=flexFillSingle.Col=
0.Row=
0.RowSel=
1.ColSel=.Cols-
1.CellAlignment=
4.Row=1EndWithEndSubPublicSubclassshowdataDimjAsIntegerDimiAsIntegerDimmrc1AsADODB.Recordsettxtsql=select*formbjwhere专业=Trimtxtsqland班级=TrimtxtsqlSetmrc1=ExecuteSQLTrimtxtsqlIfmrc
1.EOF=FalseThenmrc
1.MoveFirstWithMSF
1.Rows=1DoWhileNotmrc
1.EOF.Rows=.Rows+1Fori=1Tomrc
1.Fields.Count.TextMatrix.Rows-1i=mrc
1.Fieldsi-1Nextimrc
1.MoveNextLoopmrc
1.CloseEndWithElseIfclassfind=TrueThenFormclass
2.HideFormclass
3.Showzzz=MsgBox对不起,没有此班级的记录vbOKOnly警告Formclass
3.ZOrder0Formclass
3.Text
10.SetFocusEndIfEndIfEndSubPrivateSubForm_ActivateIfclassfind=TrueThenFormclass
3.ZOrder0Formclass
3.Text
10.SetFocusEndIfIfclassfind=TrueThenExitSubElseIfclassmodi=TrueThenclassshowdataclassmodi=FalseElseclasstreeEndIfEndSubPrivateSubToolbar1_ButtonClickByValButtonAsMSComctlLib.ButtonSelectCaseButton.TagCasefindFormclass
3.ShowFormclass
3.ZOrder0Formclass
3.Text
10.SetFocusCasemodiIfTrimMe.MSF
1.TextMatrixMSF
1.Row1=Thensssss=MsgBox对不起,你是只读用户,不能修改记录,请与管理员联系vbOKOnly+vbExclamation警告ExitSubElseqxstr=Executeqx2Ifqxstr=readonlyThenss=MsgBox你还没有选择记录vbInformation+vbOKOnly警告ExitSubEndIfclassmodi=TrueFormclass
1.ShowFormclass
1.classloadFormclass
1.ZOrder0EndIfCasedelqxstr=Executeqx2Ifqxstr=readonlyThenss=MsgBox对不起,你是只读用户,不能删除记录,请与管理员联系vbInformation+vbOKOnly警告ExitSubEndIfDimmrcAsADODB.RecordsetDimmsgtextAsStringDimintcountAsIntegerIfTrimMe.MSF
1.TextMatrixMSF
1.Row1=Thensssss=MsgBox你还没有选择记录vbOKOnly+vbExclamation警告ExitSubEndIfIfMsgBox确实要删除班级为TrimMe.MSF
1.TextMatrixMSF
1.Row2的记录吗Chr13Chr10该操作会导致班级成绩记录的丢失vbOKCancel+vbExclamation警告=vbOKThentxtsql=delete*fromxjwhere°à¼¶=TrimMe.MSF
1.TextMatrixMSF
1.Row2Setmrc=ExecuteSQLtxtsqltxtsql=select*fromcjwhere学号inselect*fromxjwhere学号=TrimMe.MSF
1.TextMatrixMSF
1.Row2Setmrc=ExecuteSQLtxtsqltxtsql=delete*frombjwhere专业=TrimMe.MSF
1.TextMatrixMSF
1.Row2Setmrc=ExecuteSQLtxtsqlEndIfclassshowtitleclassshowdataEndSelectEndSubPublicSubclasstreeTreeView
1.Nodes.ClearDimnodexAsNodeDimmrcAsADODB.RecordsetDimmrc1AsADODB.RecordsetDimstrAsStringDimaAsStringa=专业TreeView
1.LineStyle=tvwRootLinesstr=selectdistinct专业frombjorderby专业Setmrc=ExecuteSQLstrstr=selectdistinct专业,班级frombjorderby专业,班级Setmrc1=ExecuteSQLstrmrc.MoveFirstDoUntilmrc.EOFmrc
1.MoveFirstSetnodex=TreeView
1.Nodes.Addamrc.Fields011DoWhileNotmrc
1.EOFIfmrc
1.Fields0=mrc.Fields0ThenSetnodex=TreeView
1.Nodes.AddatvwChildmrc
1.Fields122EndIfmrc
1.MoveNextLoopa=a1mrc.MoveNextLoopmrc
1.Closemrc.CloseSetmrc=NothingSetmrc1=NothingEndSubPrivateSubTreeView1_DblClickOnErrorGoTossIfTreeView
1.SelectedItem.Index=0ThenMSF
1.ClearExitSubEndIftxtsql=TreeView
1.Nodes.ItemTreeView
1.SelectedItem.Indextxtsql=select*frombjwhere专业=Trimtxtsqland班级=Trimtxtsqlorderby专业printstr=txtsqlMe.Caption=浏览班级信息Me.classshowtitleMe.classshowdataExitSubss:MSF
1.ClearEndSubPrivateSubForm_UnloadCancelAsIntegerIffind=TrueThenfind=FalseFormclass
3.Text
10.SetFocusEndIfEndSub查询班级信息窗体的代码PrivateSubCommand1_Clicktxtsql=IfText
10.TextThenIftxtsql=Thentxtsql=班级TrimText
10.TextElsetxtsql=txtsqland班级=TrimText
10.TextEndIfEndIfIfText
11.TextThenIftxtsql=Thentxtsql=专业=TrimText
11.TextElsetxtsql=txtsqland专业=TrimText
11.TextEndIfEndIfIfText
12.TextThenIftxtsql=Thentxtsql=班主任=TrimText
12.TextElsetxtsql=txtsqland班主任=TrimText
12.TextEndIfEndIfIftxtsql=Thenss=MsgBox至少要输入一个条件才能查询警告Text
10.SetFocusExitSubEndIftxtsql=select*frombjwheretxtsqlDimmrcAsADODB.RecordsetSetmrc=ExecuteSQLtxtsqlIfmrc.EOF=TrueThenzzz=MsgBox对不起,没有此班级的记录vbOKOnly查询Formclass
3.ZOrder0Formclass
3.Text
10.SetFocusExitSubEndIfFormclass
2.printstr=txtsqlclassfind=TrueFormclass
3.HideFormclass
2.ShowFormclass
2.classshowtitleFormclass
2.classshowdataFormclass
2.Caption=班级查询结果Formclass
2.ZOrder0EndSubPrivateSubForm_UnloadCancelAsIntegerclassfind=FalseEndSub肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆羂葿莈袂袈肅蒀蚄螄肄薃袀膂肃莂螃肈肃蒅羈羄肂薇螁袀肁虿薄腿肀荿蝿肅腿蒁薂羁膈薄螈袇膇芃薀袃膇蒆袆膁膆薈虿肇膅蚀袄羃膄莀蚇衿膃蒂袂螅节薄蚅肄芁芄袁羀芁莆蚄羆芀蕿罿袂艿蚁螂膁芈莁薅肇芇蒃螀羃芆薅薃衿莅芅螈螄莅莇薁肃莄蒀螇聿莃蚂薀羅莂莁袅袁莁蒄蚈膀莀薆袃肆荿蚈蚆系或部分班财务处学生处新生学生学生处考试成绩奖惩信息教室学生学生档案管理学生D1学生基本信息表D3课程信息表
1.2建档分班
1.3课程确定
1.1注册学生D4成绩信息表D2班级信息表
1.4档案管理学生名字学生信息表别名描述记录每一个学生基本情况的表定义学生信息=学号+姓名+性别+政治面貌+班级+专业+出生日期+家庭住址+邮政编码+电话+备注位置学籍管理系统数据库名字学号别名描述唯一地标识学生信息表中一个特定学生的关键域定义学号=10{文本}10位置学生信息表成绩名字班级信息表别名描述记录每一个班级基本情况的表定义班级信息表=班级+专业+年制+所属系+班主任+人数位置学籍管理系统数据库名字课程信息表别名描述记录每一门课程基本情况的表定义课程信息表=课程号+课程名+类型位置学籍管理系统数据库名字课程号别名描述唯一地标识课程信息表中一门特定课程的关键域定义课程号=10{文本}10位置课程信息表名字成绩表别名描述记录每一门课程可考试成绩情况的表定义成绩表=学号+姓名+课程名+学期+成绩位置学籍管理系统数据库名字班级表别名描述记录每一个班级基本情况的表定义班级表=专业+班级+年制+所属系+班主任+人数位置学籍管理系统数据库学号姓名性别班级政治面貌专业出生日期学生邮政编码联系电话家庭住址课程课程名课程号类型班级所属系班级专业班主任人数学生课程学生属于成绩专业属于班级信息录入初始化用户信息修改与奖惩信息录入录入成绩结束学籍管理系统系统档案管理修改密码添加用户添加信息查询修改信息添加奖惩信息打印退出系统班级管理专业与课程添加班级修改班级课程信息设置专业课程修改课程添加课程设置课程类型成绩管理打印成绩单查询修改成绩添加成绩学生学籍管理系统帮助成绩管理班级课程管理班级管理档案管理系统管理帮助关于系统信息添加成绩浏览成绩查询成绩基本课程设置添加班级课程添加班级浏览班级查询班级添加档案浏览档案查询档案添加用户修改密码重新登录开始用户登录显示主菜单选择班级管理成绩管理课程管理档案管理用户管理退出PAGE18。