基于visual_basic平台的学生宿舍管理系统的开发与设计毕业设计

基于visual_basic平台的学生宿舍管理系统的开发与设计毕业设计内容摘要：

rivate Sub Command1_Click() End Sub （ 2） 、 “删除”按钮代码 Private Sub Command2_Click() End Sub （ 3） 、 “修改”按钮代码 Private Sub Command3_Click() End Sub 24 （ 4） 、 “确定”按钮代码 Private Sub Command4_Click() End Sub （ 5） 、 “返回”按钮代码 Private Sub Command6_Click() End Sub （ 6） 、 “退出”按钮代码 Private Sub Command5_Click() End End Sub 维修情况 此功能则是在寝室设备损坏后，请工作人员维修好后的记录，如果是人为损害的情况则需要记录赔偿情况，如果是非人为的情况则不需记录入数据库。 同时也可以查询所有寝室的维修情况。 维修情况窗口截图 图 “请输入寝室号查找”，“寝室号”、“维修情况”、“赔偿情况”、“时间”为标签框 Label1~Label5；添加 5 个文本框 text1~text5 与之对应；“添加”、“更改”、“更新”、“返回 ” 、“查找”分别为mand1~ data1，连接数据库“维修情况”。 “添加”按钮则是在每次新的维修情况出现后添加新的记录入数据库，更改则是在记录出错的情况下可以进行信息的修改，更新则是在每次新的记录后或是修改记录后可以点击更新按钮则重 25 新。 维修情况窗口的代码 （ 1） 、 “ 添加”按钮的代码 Private Sub Command1_Click() End Sub （ 2） 、 “更改”按钮的代码 Private Sub Command2_Click() End Sub （ 3） 、 “更新”按钮的代码 Private Sub Command3_Click() End Sub （ 4） 、 “返回”按钮的代码 Private Sub Command4_Click() End Sub （ 5） 、 “查找”按钮的代码 Private Sub Command5_Click() If = Or Trim((寝室号 )) Then MsgBox 没有该寝室 Else Do While Trim((寝室号 )) Loop If Trim() = Trim((寝室号 )) Then = (寝室号 ) = (维修情况 ) = (赔偿情况 ) = (时间 ) End If End If End Sub 26 卫生检查 该功能是在每次学校或是系部进行卫生检查后就进行评分，然后记录分数，并保存入数据库。 在一学年后可调出记录进行总结，评优秀寝室等。 一、 卫生检查窗口截图 图 “寝室号”、“分数”、“时间”为标签框 Label1~Label3；对应添加 3 个文本框 text1~text3。 “添加”、“修改”、“返回”、“退出”分别为 mand1~mand4；添加 data1，连接数据库“卫生检查”。 单击“添加”按钮则添加记录入数据库，以 便以后随时查询，“修改”则是修改当前已有信息，“返回”则是返回管理员主窗口界面，“退出”则是退出整个学生宿舍管理系统。 卫生检查窗口的代码 （ 1） 、 “添加” 按钮 代码 Private Sub Command1_Click() End Sub （ 2） 、 “修改” 按钮 代码 Private Sub Command2_Click() End Sub （ 3） 、 “返回”按钮代码 Private Sub Command4_Click() End Sub 27 （ 4） 、 “退出”按钮代码 Private Sub Command3_Click() End End Sub 来访人员 来访人员登记 则是在宿舍以外的人进入宿舍进行登记，然后记录入数据库。 来访人员窗口截图 图 “寝室号”、“访问者姓名”、“学生姓名”、“时间”、“事件”分别是由标签框 Label1~Label5 组成；对应添加 5 个文本框text1~text2；“添加”、“确定”、“返回”为 3 个命令按钮mand1~mand3；添加 data1，连接数据库“来访人员”。 单击“添加”按钮是可以添加新的来访人员记录，并存入数据库。 “确定”按钮则是在输入新的记录后确定保存入数据库。 “返回”则是返回到管理员主窗口界面，课进行其他操作。 来访人员窗口代码 （ 1） 、 “添加”窗口代码 Private Sub Command1_Click() （ 2） 、 “确定”窗口代码 Private Sub Command2_Click() End Sub （ 3） 、 “返回” 窗口代码 Private Sub Command3_Click() 28 End Sub 学生信息 可以对 学生的信息进行管理，包括学好、姓名、班级、寝室号、寝室电话、家庭住址、权限、个人电话等。 以及对这些信息的添加、删除、修改等。 一、学生信息窗口截图 图 “学号”、“寝室号”、“姓名”、“寝室电话”、“班级”、“家庭住址”、“权限”、“个人电话”“（权限 „ 为学生）”分别为 Label1~Label9；对应有 text1~text8；“添加”、“修改 ”、“删除”、“确定”、“返回”分别为 mand1~mand5；添加 data1，连接数据库“ loading”。 单击“添加”按钮的时候则可以添加学生信息，修改则是可以对已有的学生的信息进行修改，删除则是在已有的信息上进行删除操作，确定则是确定讲信息存入数据库，返回则是回到管理员主窗口。 学生信息窗口代码 （ 1）、 “添加”按钮的代码 Private Sub Command1_Click() If = Or = Or = Or = Or = Or = Or = Or = Then MsgBox 请输入完整信息。 Else 29 End If End Sub （ 2） 、“修改”按钮的代码 Private Sub Command2_Click() End Sub （ 3）、 “删除”按钮的代码 Private Sub Command3_Click() End Sub （ 4）、 “确定”按钮的代码 Private Sub Command5_Click() End Sub （ 5） 、“返回”按钮的代码 Private Sub Command4_Click() End Sub 普通用户界面的设计 普通用户 主窗口 该窗口的设计跟管理员过度窗口的设计是一样的，目的是提醒用户当前日期以及用户欢迎词。 学生 主窗口截图 图 30 “通知”包括“最新通知”和历史通知；“收费管理”包括“ 水电费 ” 和“公务赔偿”；“查询信息”“密码修改”包括“个人信息”和“寻找同学”；“返回”包括“返回”和“退出”；“欢迎你在”“ 20200228”“登陆学生宿舍管理系统”分别为 Label1~Label3； 作为普通用户，没有对信息的编辑权限，所以没必要设计可以编辑的菜单。 学生主窗口代码 （ 1） 、 “最新通知”菜单代码 Private Sub mnuzuixin_Click() End Sub （ 2） 、 “历史通知”菜单代码 Private Sub mnulishitongzhi_Click() End Sub （ 3） 、 “公务赔偿”菜单代码 Private Sub mnugongwupeichang_Click() End Sub （ 4） 、 “水电费”菜单代码 Private Sub mnushuidianfei_Click() End Sub （ 5） 、 “个 人信息”菜单代码 Private Sub mnugerenxinxi_Click() End Sub （ 6） 、 “寻找同学 ”菜单代码 Private Sub mnuxunzhaotongxue_Click() End Sub （ 7） 、 “密码修改”菜单代码 Private Sub mnumimaxiugai_Click() End Sub （ 8） 、 “返回”菜单代码 Private Sub mnufanhui_Click() 31 End Sub （ 9） 、 “退出”菜单代码 Private Sub mnutuichu_Click() End End Sub （ 10） 、 窗体加载代码 Private Sub Form_Load() d$ = Date$ = d$ End Sub 最新通知 该功能是当用户登录到该系统后，在管理员修改通知后，普通用户就可以查看新的通知。 最新通知窗口截图 图 通知是由一个文本框 text1 将其 enabled 属性设置为 false；“返回”，“退出”分别由 mand1 和 mand2 组成。 由于是普通用户，所以没有权限编辑，只能查看，所以只需设置两个按钮即可“返回”、“退出”。 “返回”即返回普通用户主菜单界面，“退出”即普通用户退出学生宿舍管理系统。 最新通知窗口代码 （ 1） 、 “返回”按钮代码 Private Sub Command2_Click() End Sub 32 （ 2） 、 “退出”按钮代码 Private Sub Command1_Click() End End Sub 历史通知 普通用户可以进入此窗口进行历史通知的查询。 历史通知窗口截图 图 Label1由一个 text1将起 enabled属性设置成 enabled；“返回”和“退出” mand1 和 mand2. 上图为无历史通知的情况下窗口的截图。 “返回”则是返回普通用户主菜单窗口，“退出”则是普通用户退出学生宿舍管理系统。 历史通知窗口代码 （ 1） 、 “返回”按钮代码 Private Sub Command2_Click() End Sub （ 2） 、 “退出 ”按钮代码 Private Sub Command1_Click() End End Sub 水电费 水电费窗口显示的是水单价、数量、总价，电单价、数量、 33 总价以及共计价格，其中可以以输入的方式查询要查询的寝室的具体情况。 水电费窗口截图 图 “请输入寝室号”“（格式如： „ 101）”“用水”“单价”“数量”“水费”“用电”“单价”“数量”“电费”“共计”均为 label 标签框；“确定”“继续查询”“返回”为 mand 命令按钮；其余均为文本框，除 text1 外，其余 text 的 enabled 属性均为 false； 添加data1 和 data2，连接数据库“水电单价”和“水电费”。 水电费窗口代码 （ 1） 、“ 确定”按钮代码 Private Sub Command1_Click() If = Then MsgBox 请输入寝室号 End If Do While Trim((寝室号 )) Loop If Trim() = Trim((寝室号 )) Then = (水数量 ) = (水费 ) = (电数量 ) 34 = (电费 ) = (总费 ) = False End If End Sub （ 2） 、 “继续查询”按钮代码 Private Sub Command2_Click() = True End Sub （ 3） 、 “返回”按钮代码 Private Sub Command3_Click() End Sub （ 4） 、 窗体加载代码 Private Sub Form_Load() = False = False End Sub 公务赔偿 该功能介绍的是在宿舍设备损害后进行维修的情况，包括人为的和非人为的，其中人为的要计算赔偿的。 公务赔偿窗口截图 35 图 “请输入寝室号”“（格式 „ 101）”“寝室号”“维修情况”“赔偿情况”“时间”为 label 标签框；“确定”“继续查看”“返回”为。