应用技术基于ＶＢ．ＮＥＴ的学生信息管理系统的设计与实现高双珍
（锦州师范高等专科学校
摘
要
辽宁锦州１２１０００）
分析了学生信息管理系统的设计目标和系统需求，讨论了使用ＶＢ．ＮＥＴ和ＳＱＬ实现学生信息管理
系统的技术方案。
关键词
ＶＢ．ＮＥＴ数据库
ＴＰ３１２
窗体代码文献标识码
中图分类号Ａ
开发语言选择ＶＢ．ＮＥＴ。ＶＢ．ＮＥＴ不是
１系统目标
随着办公自动化水平的不断提高，学
２系统需求
根据学校学生信息管理的实际要求，
ＶＢ６．０的简单升级，它在ＶＢ６．０基础上支
持运行时间库，提供面向对象功能，如继承性、重载等，支持多线程的开发。同时ＶＢ．
校的学生管理工作也从手工转到计算机自动化信息处理阶段。设计一个功能完整、操作简单、界面友好的教学管理系统已经势在必行。
学生信息管理系统开发的目的是针对学校现在学生信息管理的弊端，根据学生信息管理的基本流程，实现学生信息管理的电子化，提高教学管理工作的效率，保证信息的准确和规范，使学生信息管理工作真正做到科学、合理的规划，系统、高效的实施。具体说，系统设计目标是：建立基于校园网的学生管理信息系统，建立集成的辅助教学信息服务系统。该系统是一个基于不同用户类型的系统，有两类用户可以使用本系统：学生用户和教务管理员用户。系统可适用各类各级人才培养学校和培训机构，可管理各类各级学生信息。间。电涌防护器的反应时间必须比电涌的速度快。反应时间在毫微秒（纳秒）级均符合技术要求；③一次能够处理的最大电流。最大电流即峰流是一个电涌防护器的处理最大电流的能力。对多雷击区的贵重电气设备，应在建筑物人口的交流配电箱处安装一个较大的防护器，型号从６５～１６０ｋＡ；
结合学生信息管理的实际流程，该系统需要满足以下需求。掌握每个学生的基本情况，包括学号、班级、学生姓名、出生日期、性别、家庭住址、电话、简历、照片等；基于权限的管理。可同时提供教务管理人员或者学生使用，但对于学生类用户而言，只能查看其本人信息。而对于教务管理人员用户而言，其可管理所有学生的信息；为教务管理人员提供灵活的浏览和查找功能。可以查看某个系、某个班级所有学生信息，可以对学生信息提供模糊和精确查找；教务管理人员可以对学生信息进行变动管理，对学生信息进行添加；可以对学生的基本信息生成报表并打印。
ＮＥＴ也是真正的编译语言，在．ＮＥＴ框架中
可以编译到公共语言运行时，使程序能在不同浏览器中、不同操作平台下运行。
ＶＢ．ＮＥＴ的数据访问机制是利用ＡＤＯ．ＮＥＴ访问数据库。它是一种非连接的数据
库访问机制，是以有节制地使用连接的结构中心对数据库进行访问，应用程序连接到数据库的时间足够获取或更新数据，所以数据库并未被大部分空闲的连接站用，所以它可以为更多用户提供服务。
３．２功能模块
根据系统需求，结合实际情况，经过模
块分析，系统应具有以下功能模块（见图
３
３．１
系统设计与实现
实现技术
１）：
负责验证各种用户的身（１）系统登录。
份，根据不同的用户类别进入不同的用户线把计算机与电话线或局域网连接在一将起；给计算机提供电源的交流电源线路、计算机与电话通信网、数据网或其他局域网连接在一起的数据线路，电涌可以通过这些线路破坏性地干扰计算机。因此，与计算机相连的电源和数据线都需要安装电涌防护器。
６电涌防护器设置
最大的电涌产生在建筑物外，由雷电
和电力公司切换负载所致，这种感应电涌可沿电力线传输，进入建筑物内，电源系统电涌防护器的具体配置应根据供电系统接地型式选择。２２０／３８０Ｖ供电系统接地型式常采用的有ＴＮ—Ｓ、ＩＮ—Ｃ—Ｓ、ＴＴ、ＩＴ四种。设计时，一般根据电源装置所处区域按通流能力三级配置电涌防护器：一级（总配电柜，不低于ＬＰＺｌ区内），Ｕｐ＝２．０ｋＶ，Ｉｍａｘ＝
④吸收能量的能力。电涌防护器吸收能量
的能力以焦耳来衡量，焦耳值越高，电涌防护器的使用寿命越长；⑤钳制电压的能力。也就是将过电压钳制到电气设备所能承受的安全范围之内的能力。计算机被设计在一定电压范围内使用，如果超出了这个范围就会导致计算机的损坏。因此电涌防护器必须把过电压钳制到安全水平。
７结语
电气设备机房的电涌过压及电磁干扰
的防护，是保证正常办公、生产、电气设备及人身安全的重要技术手段，是确保精密电子设备运行和信息网络正常运行不可缺少的技术环节。在日常办公和经营活动中的重要作用变得越来越突出和重要。
（责任编辑
高
平）
６５ｋＡ（８／２０μｓ）；二级（分配电柜，不低于ＬＰＺ１区内），Ｕｐ＝１．２／１．８ｋＶ，Ｉｍａｘ＝４０ｋＡ（８／２０μｓ）；三级（设备处，不低于ＬＰｚｌ区内），Ｕｒｅｓ＜１ｋＶ，Ｉｍａｘ＝６．５ｋＡ（８／２０μｓ）。
交流电源与计算机的电源相连，数据
收稿日期：２００８－０３－２４
ＰＩＯＮＥＥＲＩＮＧＷＩＴＨＳＣＩＥＮＣＥ＆ＴＥＣＨＮＯＬＯＧＹＭＯＮＴＨＬＹＮＯ．８２００８１５３
科技创业月刊基于ＶＢ．ＮＥＴ的学生信息管理系统的设计与实现
张数据表，ＵＳＥＲ表：记录用户信息；ＤＥ－
ＰＩＯＮＥＥＲＩＮＧＷＩＴＨＳＣＩＥＮＣＥ＆ＴＥＣＨＮＯＬＯＧＹＭＯＮＴＨＬＹ学生信息管理系
ＰＡＲＴ表：记录各系信息；ＣＬＡＳＳ表：记录
学生所属班级；ＣＯＵＲＳＥ表：记录学生所修课程；ＳＴＵＤＥＮＴ表：记录学生基本信息；
登录管理
学生管理
教学信息
查询管理
打印报表
４结语
学生信息管理系统已实现了学生信息
的在线管理，将学校行政办公人员从繁重的学生信息管理工作中解脱出来，而且规范了学生信息管理的工作流程，分权限的访问使系统的安全性得到了提高。本系统采取了ＡＤＯ．ＮＥＴ与ＳＱＬＳｅｒｖｅｒ数据库连接，从数据操作中可以有效地将数据访问分解为多个可以单独使用或先后使用的不连续组件。对于检索结果，可以将其放在
ＲＥＳＵＬＴ表：记录学生课程成绩信息；３．５
窗体及代码设计
主窗体将各子窗体通（１）主窗体设计。
窗体中只过菜单项集合在一起，方便调用。有四个菜单控件。
在主窗体的部分代码：
图１系统功能模块
登录登录成功否？
登录失败
ＰｒｉｖａｔｅＳｕｂＦｒｍＭａｉｎ＿Ｌｏａｄ（ＢｙＶａｌ
ｓｅｎｄｅｒＡｓＯｂｊｅｃｔ，ＢｙＶａｌｅＡｓＳｙｓｔｅｍ．ＥｖｅｎｔＡｒｇｓ）ＨａｎｄｌｅｓＭｙＢａｓｅ．Ｌｏａｄ
ＤｉｍｃｈｅｃｋＡｓＢｏｏｌｅａｎ＝ＴｒｕｅＴｒｙＤｏ
ＤａｔａＳｅｔ对象中，使得来自多个数据源的数
据组合在一起，向用户公开。这种设计方案和实现技术对于开发类似系统有一定的参考价值。
参考文献
登录成功
学生用户
进入主界面
管理员
查看学生信息
浏览用户信息管理学生信息
图２
信息管理系统流程图
报表表单
ＤｉｍＬｏｇｉｎＡｓＮｅｗＬＯＧＩＮＬｏｇｉｎ．ＳｈｏｗＤｉａｌｏｇ（）
ＩｆＬｏｇｉｎ．ＤｉａｌｏｇＲｅｓｕｌｔ＝ＤｉａｌｏｇＲｅｓｕｌｔ．ＯＫＡｎｄＬｏｇｉｎ．ｆｌａｇＴｈｅｎ
ｃｈｅｃｋ＝Ｆａｌｓｅ
ＥｌｓｅＩｆＬｏｇｉｎ．ＤｉａｌｏｇＲｅｓｕｌｔｇＲｅｓｕｌｔ．ＣａｎｃｅｌＴｈｅｎ
Ｍｅ．Ｃｌｏｓｅ（）ｃｈｅｃｋ＝ＦａｌｓｅＥｎｄＩｆ
ＬｏｏｐＷｈｉｌｅｃｈｅｃｋＩｆＵｓｅｒＲｉｇｈｔ＝１ＴｈｅｎＭｅ．ｕｓｅｒ．Ｖｉｓｉｂｌｅ＝ＦａｌｓｅＥｌｓｅＩｆＵｓｅｒＲｉｇｈｔ＝２ＴｈｅｎＭｅ．ｕｓｅｒ．Ｖｉｓｉｂｌｅ＝ＦａｌｓｅＭｅ．ｉｎｆｏＭａｎａｇｅｒ．Ｖｉｓｉｂｌｅ＝ＦａｌｓｅＥｎｄＩｆ
ＣａｔｃｈｅｘＡｓＥｘｃｅｐｔｉｏｎＷｒｉｔｅＥｒｒ（ｅｘ）ＥｎｄＴｒｙＥｎｄＳｕｂ
该部分主要是对学生信（２）学生管理。
息进行管理。具体功能包括增加学生信息、修改学生信息，以及删除学生信息。
部分代码：
１２３
陈英，ＶｉｓｕａｌＢａｓｉｃ程序设计［Ｍ］．大连：大连理工大学出版社，２００３
ＴｈｅａｒｏｎＷｉｌｌｉｓ著．闫英译．ＶＢ．ＮＥＴ数据库入门经典［Ｍ］．北京：清华大学出版社，２００６龚小勇．关系数据库与ＳＱＬＳｅｒｖｅｒ２０００［Ｍ］．北京：机械工业出版社，２００７
程序。学生管理提供给学生管理部门管理学生基本信息、系统信息、证书信息、素质测评信息等。
提给教务处管（２）教学基本信息管理。理学生成绩信息、课程信息等。
某个（３）查询模块。可以查看某个系、班级所有学生信息；可以对学生信息提供模糊和精确查找。
教务管理人员在查看学（４）报表模块。
生信息的同时，可以进行报表输出和打印。
＝Ｄｉａｌｏ－
（责任编辑高平）
３．３系统流程分析
学生信息管理系统的流程系统应具有
以下功能模块（见图２）：
（１）成功登录系统，进入主界面。（２）按主界面提供菜单进行任务选择。
３．４数据库的设计与实现
（１）ＡＤＯ．ＮＥＴ的数据连接。在ＡＤＯ．
ＮＥＴ中，使用连接对象创建和管理连接，选
择ＡＤＯ．ＮＥＴ中的ＳｑｌＣｏｎｎｅｃｔｉｏｎ的连接对象。如果要连接一个ＳＱＬＳｅｒｖｅｒ数据库，使用以下的连接字符串：
ＤｉｍｍｙＣｏｎｎｅｃｔｉｏｎＳｔｒｉｎｇＡｓｓｔｒｉｎｇ＝”ＤａｔａＳｏｕｒｃｅ＝ｌｏｃａｌｈｏｓｔ；Ｄａｔａｂａｓｅ＝ｎｏｒｔｈＷｉｎｄ；
ＵｓｅｒＩｄ＝ｓａ；Ｐｗｄ＝ｐａｓｓ”
ＤｉｍｃｏｎＡｓＮｅｗＳｙｓｔｅｍ．Ｄａｔａ．Ｓｑｌ－Ｃｌｉｅｎｔ．ＳｑｌＣｏｎｎｅｃｔｉｏｎ（ｍｙＣｏｎｎｅｃｔｉｏｎＳｔｒｉｎｇ）
ＡＤＯ．ＮＥＴ与ＳＱＬＳｅｒｖｅｒ数据库的连
接。可以选择以下三种方式：从服务器资源管理器中连接到ＳＱＬＳｅｒｖｅｒ；从“工具箱”的“数据”选项创建连接；以编程方式在应用程序和ＳＱＬＳｅｒｖｅｒ数据库之间创建连接。
（２）数据库表的设计。整个系统共有６
ＰｒｉｖａｔｅＳｕｂＦｒｍＳｔｕｄｅｎｔ＿Ｌｏａｄ（ＢｙＶａｌｓｅｎｄｅｒＡｓＯｂｊｅｃｔ，ＢｙＶａｌｅＡｓＳｙｓｔｅｍ．ＥｖｅｎｔＡｒｇｓ）ＨａｎｄｌｅｓＭｙＢａｓｅ．Ｌｏａｄ
ＢｉｎｄＤａｔａ（）ａｄｄＣｍｂＳｔｕＣｌａｓｓ（）ａｄｄＣｍｂＳｔｕＳｅｘ（）ＩｆＴｈｅｎ
ｂｉｎｄＴｅｘｔＢｏｘ（０）ＥｎｄＩｆＥｎｄＳｕｂ
其余窗体和代码就不在此介绍了。
ＤａｔａＧｒｉｄ１．ＶｉｓｉｂｌｅＲｏｗＣｏｕｎｔ＞０
１５４科技创业月刊２００８年第８期
