VB大作业模板

题目：班级信息系统学院: 土木与交通工程学院**：***学号：**********班级：12 路桥一班****：***成绩：日期：2014年1月注意：封面如上，打印单面。

正文打印为双面，以下正文字体为5号宋体，字符间距值为0.5，大标题加粗，详见下面模板一、选题过程1、在学校里，有学校的教务系统，信息管理系统等，那么在一个班级里是否可以有一个小程序供全班同学使用，如查询信息，反馈班级的问题，于是我便想设计一个袖珍版的12路桥一班信息系统。

2、作为班级的学生干部，若能建立一个高效的信息系统，既可以提高办事效率，又可以充分利用我们书本里所学的知识，把知识转化成为实用的东西。

二、总体目标1、系统具有多个窗体、菜单等人机交互界面。

2、可以实现多种身份验证。

3、开发系统所用的知识能够较全面地覆盖所学内容，熟悉运用和掌握所学的V B知识。

4、系统采用数据库实现数据的存储与管理。

三、系统结构及其功能1、设计结构根据系统总体目标该系统由欢迎界面，登录界面，登陆界面分为学生登录与管理员登录，学生登录进入主菜单。

主菜单的功能项有信息查询，问题反馈，图片风采。

管理员登录的界面主要查看问题的反馈。

其结构如图1所示。

图1系统结构2、功能介绍（1）用户登陆：用户通过选择单选框的登录身份进入不同的页面，学生进入主菜单，可以进行信息查询，问题反馈，浏览图片风采，管理员直接进入查看学生反馈的问题。

（2）信息查询：学生可以查看全班各位同学的信息，如电话号码，宿舍号等信息，也可以输入学号直接从数据库中查找需要的信息。

（3）问题反馈：学生输入的问题会被保存进一个顺序文件中，方便管理员进行查看。

（4）图片风采：学生可以看班级的图片，同时弹出菜单，回到主页面。

（5）查看问题反馈：管理员可以通过对话框打开存了学生反映的问题，了解学生的情况。

四、界面设计1.欢迎界面该界面主要实现的是欢迎学生登录或管理员登录，其设计结果如图2所示，界面主要控件及其属性设计如表2所示。

图2欢迎界面表2欢迎界面主要控件设置控件名称标题字体宋体五号Fo r m1w e l c o me您好，请进入主菜单界面La b e l1La b e l112路桥1班宋体粗体小一La b e l2La b e l2信息系统宋体粗体小一C o mma n d1C o mma n d1进入宋体五号其他以下的界面设计及表格如上图所示（自己再补充完整,)2.登录界面:该界面主要是给学生与管理员登录，其界面设计结果如图3，界面主要控件及其属性设计如表3所示。

图3登录界面表3登录界面主要控件设置3.主菜单界面：该界面是给学生进行选择，进入三种不同的界面，有信息查询，问题反馈，图片风采。

其界面设计结果如图4，界面主要控件及其属性设计如表4所示。

图44.搜索界面：该界面是给学生进行搜索，该功能是对班级的学生的信息进行查询，查询时通过数据库的表格，通过s e e k方法查找.其界面设计结果如图5，界面主要控件及其属性设计如表5所示。

图55.问题反馈界面：该界面是给学生进行反馈，该功能是班级的学生进行班级问题的反馈，信息的存放在顺序文件中，其界面设计结果如图6，界面主要控件及其属性设计如表6所示。

图66.图片风采界面：该界面是给学生进行图片浏览，该功能是对班级的学生的图片进行浏览，图片的对比交换，.其界面设计结果如图7，界面主要控件及其属性设计如表7所示。

图77.打开对话框界面：该界面是给管理员查询班级的问题，该功能是对班级的学生反馈的信息进行查询，查询时通过顺序文件，其界面设计结果如图8，界面主要控件及其属性设计如表8所示。

图8表89.管理员查询界面：该界面是给管理员进行问题的查看，该功能是对班级的学生的信息进行查询，查询时通过数据库的表格，通过s e e k方法查找.其界面设计结果如图5，界面主要控件及其属性设计如表5所示。

五，系统演示系统执行过程如下：系统执行出现的第一界面是欢迎界面，如图1所示。

单击进入按钮，则出现登录界面，如图2所示，选择不同的登录选项，则要输入不同的密码。

学生登录界面点击登录，则进入主菜单，主菜单共有，学生信息搜索，班级问题反馈，图片风采，三个选项，单击学生信息搜索，则进入搜索界面，查询学生信息；单击班级问题反馈，则进入问题反馈窗体，输入问题到相应的文件；单击图片风采按钮，则浏览班级的图片。

管理员登录界面，输入相应的密码，则进入管理员界面，单击打开查看按钮，则弹出，打开对话框，点击相应的文件，文本框将相应输出班级问题。

六、设计总结1、心得体会：通过编写程序做这个信息查询系统，虽然花了很多时间去思考，但是让我觉得有时觉得对课本上的知识已经懂了，有时自己动手操作的时候可能就不那么简单，通过编这个程序使我对V B面向对象编程有了一个比较全面的了解。

在设计过程中，我学会了如何一步步去调试程序，找出错误并加以改正，如何去搜索资料来为自己的问题找到解决方法。

2、遇到的问题：例如在应用数据库知识过程中，按照课本上所讲的方法，并不能实现该功能，同时由于一开始下载的vb版本是精简版的所以很多功能都没有，遇到问题后，我去网上查看相关资料，最终找到了解决问题的方法，可以实现对基本上数据库的运用，另外，还有如何通过应用通用对话框等等。

3、存在的问题：程序功能简单，实现的功能还是很小的，并不全面，而且登录并没有达到理想的效果，例如可以在此基础上运用数据库实现多个用户对应多个密码的功能，可能是最考试的科目比较多，没那么多时间进行完善。

七、代码及其解释1、欢迎界面P r i v a t e S u b C o mma n d1_C l ic k()'进入登录界面w e l c o me.H i d el o a d.S h o wE n d S u bP r i v a t e S u b Fo r m_Lo a d()La b e l1.Le f t=-3000'确定l a b e l1的水平位移l a b e l2.Le f t=0'确定la b e l2的水平位移E n d S u bP r i v a t e S u b Ti me r1_Ti me r()'t i me r事件，让文字产生动感La b e l1.Le f t=La b e l1.Le f t+100l a b e l2.Le f t=la b e l2.Le f t+100I f La b e l1.Le f t>=3000 T h e nLa b e l1.Le f t=-3000E n d I fI f l a b e l2.Le f t >=3000 T h e nl a b e l2.Le f t=-3000E n d I fE n d S u b2、登录界面P r i v a t e S u b C o mma n d1_C l ic k()'以两种身份登录p a s s w o r d= Te x t1.Te x tf l a g=Fa l s eI f O p t i o n1.Va lu e= Tr u e T h e n C a l l O p1'调用子过程o p1I f O p t i o n2.Va lu e= Tr u e T h e n C a l l O p2'调用子过程o p2I f f l a g=Fa l s e T h e nM s g B o x"密码错误，请重新输入密码！",v b O KO n l y,"警告"E n d I fE n d S u bP r i v a t e S u b O p1()'子过程o p1D i m wo r d A s Va r i a n tw o r d=A r r a y("12lq yb","12lq")'验证学生的密码登录D i m i A s I n t e g e rFo r i=0 To1I f p a s s w o r d=wo r d(i) T h e nf l a g= Tr u eme n u.S h o wl o a d.H id eE n d I fN e x t iE n d S u bP r i v a t e S u b O p2()'子过程o p2D i m a A s St r in ga="12lq yb g l y"I f p a s s w o r d=a T h e n'验证管理员的密码登录f l a g= Tr u eg l y.S h o wl o a d.H id eE n d I fE n d S u b3.搜索界面P r i v a t e S u b C o mma n d1_C l ic k()D a t a1.R e c o r d s e t.I n d e x="p r i ma r yk e y"'通过索引搜索数据库的的相关字段D a t a1.R e c o r d s e t.S e e k"=",Va l(Te x t7.Te x t)'相关字段的内容为文本框的内容E n d S u b4.问题反馈界面P r i v a t e S u b C o mma n d1_C l ic k()I f Te x t1.Te x t="" T h e nM s g B o x"请输入问题",,"输入问题" '用消息框输出消息E l s eO p e n"F:\p r o b l e m.t x t"Fo r A p p e n d A s#1'打开文件进行尾部追加文本Wr i t e#1, Te x t1.Te x t '写入文本框的内容入文件中C lo s e'关闭文件E n d I fE n d S u b5.图片风采界面P r i v a t e S u b Fo r m_M o u s e U p(B u t to n A s I n t e g e r,S h i f t A s I n t e g e r,X A s S i n g l e, Y A s S i n g l e)I f B u t to n=2 T h e n'单击右键弹出式菜单P o p u p M e n u t a n c h uE n d I fE n d S u bP r i v a t e S u b Fo r m_P a in t()D i m i A s I n t e g e r'在窗体上随机画案R a n d o mi z eFo r i=1 To50C u r r e n tX=p h o t o.Wid t h* R n dC u r r e n tY =p h o to.H e ig h t * R n dP r i n t "¤* ¤"N e x t iE n d S u bP r i v a t e S u b Ti me r1_Ti me r()'交换图片St a t i c p A s I n te g e rI f p T h e ni g1.P ic t u r e=I ma g e1(0).P i c tu r eE l s ei g1.P ic t u r e=I ma g e1(1).P i c tu r eE n d I fp=N o t pE n d S u b6.查看问题界面P r i v a t e S u b C o mma n d1_C l i c k()C o mmo nD ia l o g1.A c t io n=1'打开通用对话框O p e n C o mmo n D i a lo g1.Fi l e N a me Fo r I n p u t A s#1D o W h i le N o tE O F(1)Li n e I n p u t #1,in p u t n a me'输出文件的内容Te x t1.Te x t = Te x t1.Te x t+i n p u tn a me+v b C r LfLo o pC lo s e#1E n d S u b。