信息系统设计与开发试验报告.docxVIP

信息系统设计与开发试验报告 200606050133 毕博杨 09. 5. 29 ■ —? ■—. ，恙 4^* 7又 ooooooooooooooooooooa 1 殳计 7克 图 OOOOOOOOOOOOOOOOOOOOC 模块分析 。OOOOOOOOOOOOOOOOOOOO 四. 4^4^^ OOOOOOOOOOOOOOOOOOOOO 五. 图 OOOOOOOOOOOOOOOOOOOOO 六. 殳计 ｛于与OOOOOOOOOOOOOOOOOOOOO 一?总体设计理念 熟悉数据库的基本概念，并掌握常用数据控件的基本用法。 掌握VB数据管理器的使用方法 了解在VB中使用结构化查询的方法。 二.设计流程图 三.详细设计 1 ?设计大体框架如图 学生登录系统 r 厂 厂 班级管理系统 2 ?模块详细分解 学生登录系统 班级管理系统 学生信息 指定文件储存 实验代码 Forml双击确定按钮，输入如下代码 Pr i vate Sub Command 1_C I ick() Form2. Show End Sub Private Sub Command2_CIick() Textl = ,,n Text2 = ,,n Text3 = 1111 End Sub Form2双击查询按钮，输入如下代码 Textl ? Text Text2.Text Text3. Text Text4. Text Combo!. TextPrivate Sub Command1_CIick() Listl. Add Item Li st1 ? Add I tern Listl. Add Item Listl? Add Item Listl. Add Item End Sub Textl ? Text Text2.Text Text3. Text Text4. Text Combo!. Text Private Sub Command2_CIick() Textl = ,,n Text2 = 11,1 Text4 = End Sub Private Sub Command3_CIick() Listl. Clear End Sub Private Sub Command4_CIick() Forml ? Show Form2. Hide Text5 = ii it End Sub Pr ivate Sub Command5_CIi ck () Form3. Show End Sub Form3双击储存按钮，输入如下代码 Private Sub Command1_CIick() Listl. Add Item Textl.Text Listl. Add Item Text2. Text End Sub Pr ivate Sub Command2_CIi ck () Textl = ,,H Text2 = 11,1 End Sub Private Sub Command3_CIick() List1. Clear End Sub Pr ivate Sub Command4_CIi ck() Form4. Show End Sub Form4双击确定按钮，输入如下代码 Private Sub Command 1_CI ick() Listl. Add Item Combol. Text End Sub Private Sub Command2_CIick() Li st2. Add Item Textl.Text Textl.Text = ,,M End Sub 实验效果截图 謬班级管理系统 口回冈 学生登裔统 n 学号: 1 姓名： 1 密码： 1 确定 ■ 取消 设计心得体会 经过这次试验，让我觉得VB是一门非常有趣的课程。 我觉得这个说难它难，说不难它也不难，主要是看你的态度和 喜好问题了，这次试验不仅要熟练运用到VB数据管理器，更要求熟 悉掌握数据库的基本使用方法。两者之间互相配合是这个实验的基 础，两者的结合也是实验成功的最大原因。 2009.5.29