软件技术实验指导(完全版本).doc

软件技术实验指导实验一：VB基本控件实验知识点：文本框的双向作用（即输入与输出）；窗体的双重作用（容器与输出）；事件过程的编写；输入输出的简单实现；窗体、文本框、标签、命令按钮等基本控件的常用属性的动、静态设置等。实验要求：1）在屏幕上开辟一个窗口（文本框），窗口的上部放置一个标签，标签中显示：“欢迎使用Visual Basic6.0中文版”。窗口的下部有三个按钮，左边按钮中标有“开始显示”，中间按钮中标有“清屏”，右边按钮中标有“结束”。当鼠标单击左边按钮时，文本框中显示“春眠不觉晓，处处闻啼鸟。”如果单击中间按钮，则清除文本框中显示的内容，单击右边按钮则程序结束。2）单击“清屏”后，让光标出现在文本框中，此时往文本框中输入若干文字，例如“您好”，然后单击窗体，使得在窗体的指定位置上显示在文本框中输入的文字。 CurrentX = TextWidth(h) * 5CurrentY = TextHeight(example) * 3Form1.Print Text1.Text 3）如果将1）中单击左边按钮后文本框中显示的“春眠不觉晓，处处闻啼鸟。”改为“春眠不觉晓，处处闻啼鸟。夜来风雨声，花落知多少。”此时文本框在一行中将显示不下所有文本，请试调整该文本框的“Multiline”属性，并将文本框纵向距离调整到可容纳两行以上文字。此时再次执行程序，观察执行结果所发生的变化。附加内容：建立我的工具箱：该程序用于对Windows中的常用工具例如记事本、画图板等等进行方便的管理。程序使用者只需单击界面上的相应图标按钮，就可以启动相应的Windows程序。实验步骤：1）在窗体中央放入四个命令按钮，并选中4个按钮控件令其全部处于激活状态，单击“格式”菜单，选择“统一尺寸”子菜单下的“两者都相同”选项，可使所有被选中的按钮的外观尺寸统一；2）分别修改4个按钮的Caption属性分别为：记事本，画图板、写字板和媒体播放，并且将四个按钮的Style属性值取为Graphical属性以便在按钮控件上可以添加小图标和设置背景颜色。在图标库中给四个按钮选择放入合适的小图标。（图标库位于VB安装目录下有一个“CommonGraphics”文件夹中有大量windows的图像和图标可选。）3）使用函数Shell来调用Windows中相应的可执行程序，该函数完整形式如下：Shell(pathname,windowstyle)其中：Pathname欲调用的可执行程序路径名；Windowstyle指明被调用函数的窗口显示方式Shell (c:windowssystem32notepad.exe)实验二：界面辅助工具的应用实验知识点：掌握Toolbar、Imagelist、StatusBar等控件的加载、设置和使用，窗体间的切换方法。实验要求：运用VB中提供的界面辅助工具生成一个应用程序界面，要求该界面带有顶行下拉菜单和工具栏按钮。实验步骤：1） 实验中要求采用两个外部控件即Toolbar和ImageList,这两个控件都是ActiveX控件，都被包含于VB中携带的“Microsoft Windows Common Control 6.0”控件组中，需要在“工程”下拉菜单中找到“部件”并单击之，随后在弹出的控件目录中点选“Microsoft Windows Common Control 6.0”，使之“应用”并“确定”，这样，该组控件便被全部添加到了工具箱中。2） 预先准备好要用于窗体的素材，例如图片和若干小图标。然后分别点击工具箱中的Toolbar和ImageList,控件并将这两个控件画到窗体上。3） 向 ImageList 控件中置入合适的图象，即把未来要用于界面中按钮上的小图标预先置入ImageList 控件，具体做法： 用鼠标右键单击 ImageList 控件，然后单击“属性”以打开“属性页”对话框。 在“通用”选项卡中点选图标预设大小，这里采用3232；然后单击“图像”选项卡； 填入索引号1，然后单击“插入图片”按钮，在随后弹出的选择图片对话框中找到希望出现在 Toolbar 控件中的图象。重复该操作（每次重复，索引号加1）直到得到了所需的所有图象后，单击“确定”按钮。4） 将 ImageList 控件与Toolbar控件相关联，具体做法： 用鼠标右键单击 Toolbar 控件，然后单击“属性”以打开“属性页”对话框。 在“通用”选项卡中，单击“图象列表”框，并选择刚才置入的 ImageList 控件，然后单击“应用”。 5） 向 Toolbar 控件中添加按钮，具体做法： 用鼠标右键单击 Toolbar 控件，然后单击“属性”。 在“属性页”对话框中，单击“按钮”选项卡。 单击“插入按钮”。 单击“样式”框，并选择“分隔符”。 再次单击“插入按钮”，样式将自动被设置为“缺省”。 在“标题”框中，键入你希望出现在按钮上的文字（中文显示）。 在“关键字”框中，键入 程序中将用到的代表该按钮的名称标识符（英文） 在“图象”框中键入你想作为该按钮上图标且已经置入ImageList 控件中的图片索引号。 如果需要连续生成若干按钮则重复上述过程，直至生成所有的按钮后，单击“确定”按钮，从而完成所有按钮的添加。6） 打开菜单编辑器，可在VB的顶行菜单下面的工具栏点击快捷按钮或在顶行菜单中找到“工具”菜单并下拉选择单击“菜单编辑器”，然后逐一填写标题框中的标题（即你希望出现在顶行菜单中的标题文字和名称框中的名称（即你将要在程序中使用的有关于该菜单操作时的英文标识符），注意，最左边一列菜单项即为顶行菜单显示项，如果需要生成下拉，则每级级联都向右缩进一格。7） 最后，选择你喜欢的界面图片设置为该窗体的picture属性即可。8） 状态栏控件的使用：在工具箱中点选“StatusBar”然后在窗体的底部画上该控件，设置状态栏的属性操作如下： 用鼠标右键单击 StatusBar 控件，然后单击“属性”以打开“属性页”对话框。 选择“窗格”选项卡，在“文本”框中输入你想显示在状态栏中的状态信息。 然后可根据需要添加窗格，只需单击“添加窗格”按钮，并在相应的“文本”框中输入所需的提示信息，例如版权等等，亦可根据需要选择显示日期或时间，具体做法是在“样式”组合框中选择“5-sbrtime”即为显示时间，选择“6-sbrdate”即为显示日期。9） 在该工程中添加若干窗体（与Toolbar生成的按钮数相同），并且在每个窗体上放一个命令按钮，以便实现窗体间的切换。10）设计一个趣味调色板。通过改变红、绿、蓝三种基本颜色的比例，显示调色结果。具体步骤如下： 在界面上放置3个滚动条控件（HScrollBar水平滚动条），8个标签（label）控件，1个形状（shape）控件和2个命令按钮，其中形状控件是用来显示调出的颜色结果的，标签控件则分别用来静态显示“红”、“绿”、“蓝”和动态显示红绿蓝三色配比读数以及其它提示性信息，三个滚动条则用来在程序执行时调整三原色的配比比例。 形状控件shape的初始设置：Shape属性设置值为“oval”这样所显示的形状就是椭圆形的；Backstyle属性设置值为“opaque”;Fillcolor属性设置初始值为白色； 程序中使用RGB函数。该函数的完整格式： RGB（red，green，blue）其中的red、green、blue分别代表红、绿、蓝的三个整型数据，其值在0255之间（如果超过255，则当作255处理）。合理搭配这三个整型数据，就可以得到全部色彩。 设置ScrollBar控件的四个属性：LargeChange滚动条控件每次能够被改变的最大值为100；SmallChange滚动条控件每次能够被改变的最小值为10；Max滚动条控件的最大值为255；Value滚动条控件的当前值随程序运行变化； 编写调色的事件过程程序（即三个滚动条变化的事件过程）。实验三、VB程序设计技巧实验知识点：练习VB程序设计的技巧。如：pictureBox的绘图方法， 控件数组的应用，select case分支结构的掌握等实验要求： 1）设计一个可以进行四则运算的简单计算器。该计算机除了可以进行加、减、乘、除、求模（取余）等简单的四则运算外，还要求可以进行四则混合连算，并具有符合计算器日常使用习惯的容错纠错功能。具体步骤如下： 在界面上建立按钮控件数组：首先在窗体中置入一个命令按钮控件后，将其激活并点击右键通过“复制”、“粘贴”的方法依次产生19个一样的命令按钮控件，其中在创建第一个“粘贴”控件时VB会询问“是否要创建控件数组？”回答“是”即可开始依次创建该数组。 按钮属性的设置：将各按钮的caption属性分别设置为0，1，29，、，/，Mod，cls,Exit，注意在设置这些属性时其值与按钮控件的Index属性的对应性。 其它控件的属性设置：文本框作为显示操作数和结果的控件，应遵循一般计算器的显示习惯，将其Alignment即对齐属性设置为“Right”，此外，将各控件相关的字体、字号等设置为统一风格。 在程序的通用区定义四个窗体层变量：num1、num2、sum、act、前三个为双精度、act为整型变量。 编写进行四则运算所需的程序作为命令按钮的单击事件过程。2）建立一个三角函数图像的程序。要求用户只需在界面上选择欲演示的函数类型，同时输入相关参数，即可在绘图区域中看到满足条件的函数图像。具体步骤： 在界面上布置一个图片框（PictureBox);两个文本框(TextBox)；一个组合框(ComboBox)；三个命令按钮(CommandButton)；四个标签(label)； 设置各控件的基本属性即字体、字号、颜色等；组合框（ComboBox）是一个单选型控件，可事先在其中添加可供选择的项目：sin、cos、tan和ctn四个函数选项；方法是在它的属性窗口中找到其“List”属性，然后将四个选项依次添加即可。 函数图像是由一系列点组成的，在程序中可以设置一个循环，让循环变量x从0到15之间依次取值，步长为0.001，并同时计算对应于X坐标的Y值，即可确定每一点的绘图坐标，这些点用Pset语句进行绘制。Pset语句的完整形式： object.Pset(x ,y).color 图片框将满足函数条件的图像以类似： Y=SinX+ 这样的形式显示出来。其中和分别代表X轴上的位移量和Y轴上的伸缩量 编写程序代码。实验四 小综合实验知识点：掌握时钟控件的使用，熟悉时钟控制程序的编程思路，熟练应用输入与输出相结合的方法，熟练运用函数调用来实现相关功能，将编程思想和控件融为一体来解决实际应用中的问题。实验要求：设计一个具有实际应用价值的动态倒计时牌。要求目标时间（即倒计时截至时间）的年、月、日、时、分、秒以及倒计时主题可以根据不同主题由用户动态设定，并且在此设定基础上在屏幕上显示距离相关主题到达之时还有n年、n天和n秒（其中的三个n各不相同，且随着程序运行动态变化），以北京时间作为主要显示板块，同时显示纽约、伦敦时间的附加倒计时板块。程序中除了刚运行时给出一次当前标准时间值（或读出系统当前时间）外，在程序运行期间应在自己独立的用户时钟控制下，而不受外界输入影响和系统时间的束缚。实验步骤： 1）根据实验设计需要在窗体上放上若干所需的标签控件、文本框控件、时钟控件、框架控件、组合框控件、命令按钮控件等，并设置各控件的必要属性值；2）在程序中用时钟控件不断触发系统时间与预设定时间时间截止点的时间差：分别计算当前时间和预设定时间截止点之间相差的整年数、当前时间到时间截止点还差的不足一年的天数和当前时间到时间截止点之间相差的不足一天的秒数并分别显示之。3）程序中调用系统时间综合使用了“Now”函数和“Format”函数，其完整形式为： Format（Now, “hh:mm:ss”） Format（Now，“mm/dd/yy”）前者可以按照“小时：分钟：秒”的形式返回当前时间；后者可以按照“月/日/年”的形式返回。4）为保证应用程序的灵活性，应在倒计时牌上设有暂停、继续、时间校正、时区切换，结束运行等特殊要求的激发点。5）按照需要构筑程序框架并编写应用程序。实验五 关系数据库基础知识实验知识点： 关系数据库，数据库表，数据库表之间的关系，数据查询。实验要求：1 熟悉Access 2003 的环境。掌握 Access 2003的启动与退出；熟悉并掌握数据库文件的建立与打开。2 熟悉数据库基本表的创建方法；掌握基本表中数据的录入方法。3 熟悉数据库表结构的修改方法；熟悉数据库表中各属性的设置方法。4 熟悉数据库基本表之间关系的设定方法。5 熟悉如何使用sql语句在Access 2003环境下实现数据查询。6 熟悉转换数据库格式的方法。实验内容：1. 启动和退出Access 2003数据库；新建、打开和关闭.mdb数据库文件。2. 使用设计器创建表和通过输入数据创建表这两种方法建立数据库文件；修改创建的数据库表的结构；设置数据库表中字段的各个属性；在创建的数据库表中录入数据。3. 掌握为表创建主键的方法。4. 掌握为表创建索引的方法。5. 设定创建的数据库表之间的关系，并能实施参照完整性、能级联更新和删除。6. 在Access 关系数据库环境中用sql语句实现数据查询。7. 在Access 关系数据库环境中转换数据库格式。实验步骤：1 启动和退出Access 2003环境。打开和关闭Access 2003数据库文件。（1）在windows环境下，单击【开始】【所有程序】 【Microsoft Office 2000/2003】【Microsoft Office Access 2000/2003】项，即可启动Access 2000/2003（如图5-1和图5-2）。 图5-1 启动Access 2003图5-2 Access 2003用户界面（2）点击【文件】【退出】项，或点击界面右上角的退出按钮，即可退出Access 2003环境。（3）在新建文件栏中点击【空数据库】项，就可打开如图5-3所示的对话框。在此可以指定新建的.mdb数据库文件名和存放路径。 图5-3 新建数据库文件对话框（4）点击【文件】【打开】项，即可打开如图5-4所示的对话框。在此可以选择要打开的.mdb数据库文件并打开之。 图5-4 打开数据库文件对话框（5）点击【文件】【关闭】项，即可关闭.mdb数据库文件。2 根据以上步骤，新建“学生信息管理.mdb”数据库文件。打开“学生信息管理.mdb”，并在该数据库中创建“学生信息”、“课程信息”和“选课信息”三个数据库表。表结构和记录内容如表5-1，表5-2，表5-3，表5-4： 表名称字段名称数据类型字段大小学生信息学号文本2姓名文本10性别文本2年龄数字整型系文本2联系电话文本15选课信息学号文本2课程号文本2成绩数字单精度型课程信息课程号文本2课程名称文本20学分数字整型表5-1 数据表结构学号姓名性别年龄系联系电话S1徐小帆男1922780451S2辛小明女2062781324S3王三风男1912780112S4邓一鹏男2562781323S5张洋洋男2322780241S6王小小女2432782365S7钱克非男2162781325S8田甜女2032782156S9王力男1942783456表5-2 学生信息表记录课程号课程名学分C1数学分析4C2英语5C3C语言3C4数据结构3C5政治2C6物理4C7逻辑电路3 表5-3 课程信息表记录学号课程号成绩学号课程号成绩S1C178S3C587S1C288S3C670S1C389S4C165S1C460S4C242S1C565S4C578S2C188S4C657S2C280S5C176S2C395S5C278S3C276S5C378S3C378S5C460S3C489S5C599表5-4 选课信息表记录（1）单击【对象】栏中的【表】，双击【使用设计器创建表】，或单击【新建】按钮，选择【新建表】项中的【设计视图】项，打开表设计器窗口，按表5-1定义的“学生信息”表中的每个字段如图5-5所示。将所有字段的名称、数据类型、字段大小等属性根据表5-1定义结束后，关闭该窗口，在出现的“另存为”对话框中输入表名“学生信息”，然后单击“确定”按钮，弹出“尚未定义主键”的对话框，提示是否创建主键，选择“否”。 图5-5 “学生信息”表定义窗口（2） 同样，按表5-1可创建“课程信息”表和“选课信息”表。（3） 在数据库窗口中，双击“学生信息”表，打开“学生信息”表的“数据表视图”。单击菜单【插入】【新记录】，或者直接在“学生信息”表中光标所在的空格栏处，按表5-2为“学生信息”表输入记录。（4） 同样，按表5-3和表5-4为“课程信息”表和“选课信息”表输入记录。（5） 以上用“使用设计器创建表”的方法创建了3个表并输入了记录。下面使用“通过输入数据创建表”的方法创建3个表并输入记录。（6） 单击【对象】栏中的【表】，双击【通过输入数据创建表】，打开如图5-6所示的设计表窗口，双击字段1、字段2、字段3、字段4、字段5、字段6，将其名称修改为“学生信息”表的字段名学号、姓名、性别、年龄、系和联系电话，并在下面行中直接输入表5-2中“学生信息”表中的记录。 图5-6 通过输入数据创建表（7） 同样，按表5-1创建“课程信息”表和“选课信息”两个表，并按5-3和5-4为这两个表输入记录。3 给新建的“学生信息管理.mdb”的三个数据库表创建主键。在“学生信息”表中，基于“学号”字段建立主键；在“课程信息”表中基于“课程号”字段建立主键；在“选课信息”表中基于“学号”和“课程号”两个字段建立主键。（1） 在设计视图中打开“学生信息”表，单击“学号”字段所在行，单击工具栏的主键按钮，“学号”字段左边带上主键标记，如图5-7所示； 图5-7 “学生信息”表主键设置窗口（2） 用同样的方法，将“课程信息”表中的“课程号”字段设置为主键。 将“选课信息”表中的“学号”和“课程号”两个字段字段设置为主键。（注意利用ctrl键同时选中“学号”和“课程号”两个字段后进行操作。）4 给新建的“学生信息管理.mdb”的三个数据库表创建索引。在“学生信息”表中，基于“姓名”字段建立一个非唯一索引；在“课程信息”表中基于“课程名”字段建立一个非唯一索引；在“选课信息”表中基于“学号”和“课程号”两个字段建立两个非唯一索引。（1） 打开“学生信息”表的设计视图，在窗口上部单击“姓名”字段所在行；在窗口下部选择【常规】选项卡，从【索引】下拉框中选择“有（有重复）”；关闭设计视图窗口。（2） 同样，在“课程信息”表中基于“课程名”字段建立一个非唯一索引。（3） 在“选课信息”表中基于“学号”和“课程号”两个字段建立两个非唯一索引。5 在“学生信息”表与“选课信息”表之间、“课程信息”表与“选课信息”表之间分别建立关系，并实施参照完整性、能级联更新和删除。（1） 打开“学生信息管理”数据库文件。（2） 从【工具】菜单项中选择【关系】项，或在工具栏中选择【关系】项（如图5-8所示），弹出如图5-9所示的“显示表”对话框，依次将“学生信息”、“课程信息”和“选课信息”表添加到关系窗口中，然后关闭该对话框。 图5-9 关系设置 图5-9 显示表对话框（3） 实数在关系窗口中，选中“学生信息”表中的“学号”字段，按住鼠标左键不放，将“学生信息”表中的“学号”字段拖到“选课信息”表中的“学号”字段上，松开鼠标，弹出“编辑关系”对话框，单击【创建】按钮，以创建“学生信息”表和“选课信息”表之间的关系。（4） 同样，选中“课程信息”表中的“课程号”字段，按住鼠标左键不放，将“课程信息”表中的“课程号”字段拖到“选课信息”表中的“课程号”字段上，松开鼠标，弹出“编辑关系”对话框，单击【创建】按钮，以创建“课程”表和“选课”表之间的关系。（5） 创建好的关系如图5-10所示，关闭关系窗口。图5-10 创建数据库表之间的关系（6） 如图5-11所示，建立表之间的关系时，在“编辑关系”窗口上有一个复选框“实施参照完整性”，单击选中它之后，“级联更新相关字段”和“级联删除相关字段”两个复选框就可以用了。选定“级联更新相关字段”复选框，则当更新父行（一对一、一对多关系中“左”表中的相关行）时，Access 2003就会自动更新子行（一对一、一对多关系中的“右”表中的相关行）；选定“级联删除相关字段”后，当删除父行时，子行也会跟着被删除。 图5-11 编辑关系窗口6 在Access 2003环境中用sql语句实现数据查询。（本实验不使用查询设计器创建查询，仅练习直接输入sql语句的方式实现数据查询。）（1）打开“学生信息管理”数据库文件。（2）在【对象】栏中选择【查询】项，双击【在设计视图中创建查询】项。在弹出的“显示表”窗口中选择【关闭】按钮。（3） 在“查询”视图中，如图5-12所示，选择【SQL视图】项。在SQL视图中输入SQL查询语句。 图5-12 SQL视图（4） 在SQL视图中输入正确的SQL查询语句，如“select * from 学生信息”，再选择【数据表视图】，就可以获得经过数据查询后的结果。（5） 关闭查询视图，弹出的对话框询问“是否保存对查询“查询1”的修改？”，选择“是”，即可保存该查询。（6） 此时，在【对象】栏中点击【查询】项，就可以看见自定义的查询已经保存在数据库环境中了。双击该查询，就弹出数据表视图，显示出查询后的数据。（7） 可以更改SQL语句，以创建不同的数据查询。7 在Access 关系数据库环境中转换数据库格式。由于不同版本的ACCESS数据库的数据结构不同，为了不同版本的ACCESS建立的数据库在其它版本的ACCESS中能够正常使用，就需要将不同版本之间的数据库文件进行转化。（1） 将旧版本的数据库转换到“Access2003”所能接收的数据库版本。单击工具栏上的【打开】按钮，在弹出的对话框中选择旧版本的.mdb数据库文件，然后单击【打开】。（2） 在弹出的“转换/打开数据库”对话框中选择【转换】选项，单击【确定】按钮就完成了将旧版本的数据库文件转换为Access 2003版本的数据库文件。（如果此时选择【打开】选项，Access 2003仅打开旧版本的数据库文件，用户不能对该旧版本中的数据库表结构做任何修改。）（3） 如果想把Access 2003中的数据库转换成旧版本的数据库文件，可以单击【工具】菜单项，选择【数据库实用工具】项，在弹出的菜单中单击【到当前的Access数据库版本】。然后设置转换后的数据库文件名称和路径。单击【保存】按钮即可。实验六 数据控件及其应用实验知识点：掌握Data控件连接数据库的方法，掌握绑定控件的相关设置，理解RecordSet的实际含义，记录集的相关属性及方法，利用Data控件连接数据库后，用AddNew、Delete、Edit、Update和Refresh方法实现数据库基本操作。实验要求：用Data控件建立与数据库的连接，并在连接的基础上在相应的绑定控件中实时显示数据库中的数据，通过操作实现数据库中数据的动、静态数据追加、修改、删除和查询。实验步骤： 1）用VB本身自带的可视化数据管理器建立student.mdb本地数据库其中包含两个表即基本情况表和学生成绩表并录入若干数据。要求数据库中必须包含照片字段。建立数据库时同时注意主、外键的相互参照性。 2）根据实验设计需要在窗体上放上若干所需的标签控件、文本框控件、 图片框、命令按钮控件等，并设置各控件的必要属性值。 3）在窗体适当位置放置一个数据控件（Data）,首先设置该数据控件的Connect、DatabaseName和RecordSource等属性，建立与数据库的连接。4）设置界面上的控件与数据控件绑定，使之受数据控件约束，并可通过其显示数据库中数据。5）设置数据控件Visible属性为不可见，通过命令按钮的单击事件过程实现数据库中数据的逐条浏览、增加、修改、删除和查询。6）编写相关的事件过程程序代码，要求浏览时禁止一切增、删、该操作，而进行增、删、改操作时又禁止移动数据指针。7）通过一键操作实现两个相同结构数据库中数据的合并，即实现批量追加操作。实验七 ADO数据控件及其相关应用实验知识点：ADO数据控件的加载，属性设置与数据库的连接，DataGrid控件的使用，体会DataGrid控件的AllowAddNew、AllowDelete和AllowUpdate属性的作用，学会使用数据窗体向导自动构成数据访问窗体。实验要求： 1）在窗体上放置已加载ADO控件及若干需绑定的控件如文本框等，分别设置ADO控件、绑定控件的相关属性，实现与数据库的连接，并完成双表查询功能，即基于Student.mdb数据库，在窗体上显示学号、姓名、专业、课程、成绩。要求ADO控件在运行时不可见的情况下，浏览上述信息，并且禁止在浏览中数据被修改。2）在窗体上放置ADO控件和DataGrid控件，完成其相关属性设置，并在此基础上完成按专业统计Student.mdb数据库中各专业的人数，按平均成绩统计前8名和按专业排列高数平均成绩的操作。3）使用数据窗体向导，分别构筑基于Student.mdb数据库的数据访问对话框，选定MSHFlexGrid数据网格窗体，主表细表形式窗体。实验步骤：上述1）、2）两项从略。使用数据窗体向导步骤如下：1）执行“外接程序”菜单中的“数据窗体向导”命令，进入“数据窗体向导-介绍”对话框，可以利用先前建立的数据窗体信息配置文件创建外观相似的数据访问窗体，选择“无”将不使用现有的配置文件。2）单击“下步”按钮，进入“数据窗体向导-数据库类型”对话框，可以选择任何版本的Access数据库或任何ODBC兼容的用于远程访问的数据库。这里选择Access数据库。3）在“数据窗体向导数据库”对话框内选择具体的数据库文件。这里选择Student.mdb数据库。4）在“数据窗体向导Form”对话框内设置应用窗体的工作特性。分别选“单个记录”形式，或选定MSHFlexGrid数据网格形式，或选定主表细表形式，并使用“ADO数据控件”访问数据。同时为即将生成的窗体命名。5）在“数据窗体向导-记录源”对话框内选择所需要的数据。6）在“数据窗体向导-控件选择”对话框内，选择所创建的数据访问窗体需要提供哪些操作按钮。7）进入“数据窗体向导已完成”对话框，可以将整个操作过程保存到一个向导配置文件.rwp中。单击“完成”按钮结束数据窗体向导的交互，此时向导将自动产生数据访问对话框的画面及代码。实验八 ADO数据控件及ODBC数据源高端应用实验知识点：了解ADO数据控件与ODBC数据源的关系，掌握ODBC体系结构以及三类数据源即系统数据源、用户数据源、文件数据源的同异，掌握MsChart控件、DataList和DataCombo等高级控件的用法。实验要求：1）建立一个ODBC的系统数据源用以连接数据库Student.mdb，然后基于该数据源的连接, 设计一个窗体，计算Student.mdb数据库内学生成绩表中每个学生的平均成绩，产生姓名、平均成绩和最低成绩三项数据，按平均成绩降序排列数据，并用该数据作图。2）另外生成一个窗体，放置一个DataList控件和若干文本框控件，将它们分别与ADO控件绑定，要求DataList控件中显示学号，使用户每次选择单击清单中的新学号，窗体上的文本框中出现相应的字段。为体会DataCombo控件的使用方法，请如DataList方法再在一个新窗体中实现同样操作。3）用外接程序的数据窗体向导创建主细表，数据库student.mdb中的主表是基本情况表，细表是学生成绩表。实验步骤： 1）在窗体上放一个ADO数据控件2）右键单击控件，并从弹出菜单中选择“ADODC属性”命令（或单击Adodc1的ConnectionString属性旁的“”按钮），打开ADO数据控件的属性页。3）选择“通用”标签，并选择“使用ODBC数据资源名称”单选项。4）单击“新建”按钮，打开“创建新数据源”窗口。在这个窗口中可以选择数据源类型，选项包括： 文件数据源 所有用户均可以访问的数据库文件。 用户数据源 只有你能访问的数据库文件。 系统数据源 能登录该机器的任何用户都能访问的数据库文件。这里选择系统数据源。5）单击“下一步”按钮显示“创建新数据源”窗口，指定访问数据库所用的驱动程序。选择Microsoft Access Driver，并单击“下一步”按钮。新窗口指出，已选择了系统数据源并用Access驱动程序访问。6）单击“完成”按钮，生成数据源。 这时就可以指定将哪个Access数据库赋予新建的数据源。在出现的“ODBC Microsoft Access 安装”窗口中，执行如下操作步骤： 在第一个框中，指定数据源名mystudent，在“描述”框中，输入简短说明：student数据源（说明可以空缺）。 单击“选择”按钮，并通过“选定数据库”窗口选择数据库。 回到ADO数据控件的属性页时，新的数据源即会出现在“使用ODBC数据资源名称”下拉清单中。7）展开下拉清单，并选择mystudent数据源。实际上，这就指定了要使用的数据库(类似于设计Data控件的atabaseName属性)。下一个任务是，选择ADO数据控件能看到的数据库记录(表格或SQL语句返回的记录集)。8）切换到“记录源”标签（或单击Adodc1的RecordSource属性旁的“”按钮）。9）在“命令类型” 下拉清单中，选择adCmdTable项目，这是记录源的类型。10）在“表或存储过程名称”下拉的清单中出现数据库中的所有表名。若选择基本情况表，Adodc1控件的RecordSource属性栏中将出现student.mdb数据库的基本情况表。若选择其它命令类型，则亦可在其中打入SQL命令，执行相关操作。11）MsChart控件、DataList和DataCombo控件的加载及设置请参考教材，这里从略。12）用外接程序的数据窗体向导创建主细表步骤如下： 选择 “外接程序”的“数据窗体向导”菜单（如菜单中无此选项，可通过“外接程序”的“外接程序管理器”加载“VB 6 数据窗体向导”），出现“数据窗体向导介绍”窗口，选择“无”，单击下一步； 在“数据窗体向导数据库类型”窗口“选择Remote(ODBC)”，单击下一步； 在“数据窗体向导连接信息”窗口,在DSN（数据源名）栏选择已定义的数据源名，单击下一步； 在“数据窗体向导Form”窗口，在“窗体名称为”文本框中输入窗体名称，窗体布局选择“主表/细表”，单击下一步； 在“数据窗体向导主表记录源”窗口选择主表及其字段，本例在“记录源” 文本框选择主表为“基本情况”，在“可用字段”中挑选字段学号、姓名、专业到“选定字段”，单击下一步； 在“数据窗体向导详细资料记录源”窗口选择细表及其字段，在“记录源” 文本框选择细表为“学生成绩表”，在“可用字段”中挑选字段学号、课程、成绩到“选定字段”，单击下一步； 在“ 数据窗体向导记录源关系”窗口，选择主表及其细表相连接的字段，在“主表”和“细表”下拉列表框中均选择“学号”，单击下一步； 在“ 数据窗体向导控件选择”窗口选择需要的控件，单击下一步；最后单击“完成”按钮。实验九 ADO对象及相关应用实验知识点：掌握ADO对象编程的基本方法，感受ADO对象编程与ADO控件连接数据库并实施操作的不同之处。了解ADO对象中的Connection对象、Command对象以及Recordset对象在数据库编程中的地位与作用。了解MsFlexgrid在对象编程中的用法。实验要求：用ADO对象方法连接前述的Student.mdb数据库，并分别用TextBox等基本控件和Msflexgrid实现数据库的查询显示，添加、删除、修改记录，以及按平均成绩统计前五名和按专业统计人数的相关操作。实验步骤： 1）执行“工程”菜单的“引用”命令，启动引用对话框，在清单中选取“Microsoft ActiveX Data Objects 2.5 Library”选项。 2）分别设置Connection对象和Recordset对象与已经建立好的Student.mdb数据库建立连接。3）对Recordset对象，用VB编程方式实施实验要求的相关操作。 实验十 大综合 实验知识点： 考查综合应用基本控件（即VB标准内部控件）和结合Data控件、ADO控件、DAO对象、ADO对象等实际应用的能力和水平。实验要求：综合已经学过的VB编程以及数据库知识，编写一个酒店前台入住、结帐的小型应用程序。要求：1）建立一个酒店管理所需的数据库，根据实际需要设置若干基本表，并且打入相关数据。2）分别至少采用Data控件、ADO控件、DAO对象、ADO对象中的三种连接数据库中的不同的记录集对象。3）客人入住登记时由程序自动产生按入住客人入住的房型并按照房型及预定入住天数给出应收取入住押金的最低限额。4）实施入住监控，当入住者超过预定入住期限或消费超支时，实施续费控制（即相应旅客入住权限受控），并采取相应提示追加入住押金的措施。5）可根据时段予以入住折扣，在结帐时，自动产生应缴纳入住金额并予以结帐找零（即退回剩余押金）的操作。实验十一 附加实验附录（实验参考程序代码）实验一的参考程序代码： Private Sub Command1_Click() Shell C:windowssystem32notepad.exe, 1 End Sub Private Sub Command2_Click() Shell C:windowsSystem32mspaint.exe, 1 End Sub Private Sub Command3_Click() Shell C:Program FilesWindows NT Accessories wordpad.exe, 1 End Sub Private Sub Command4_Click() Shell C:Program FilesWindows Media Player wmplayer.exe, 1 End Sub 实验二的参考程序代码：Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) 依据按下按钮的不同，调出不同的窗体 Select Case Button.Caption Case TOOLBAR举例1 Form2.Show form1.Hide Case TOOLBAR举例2 Form3.Show form1.Hide Case TOOLBAR举例3 Form4.Show form1.Hide Case TOOLBAR举例4 Form5.Show form1.Hide Case 退出系统 If MsgBox(确定退出系统吗？, vbYesNo + vbQuestion) = vbYes Then Unload Me End End If End SelectEnd Sub实验三参考代码一：Dim num1 As Double, num2 As DoubleDim sum As DoubleDim act As IntegerPrivate Sub Command1_Click(Index As Integer)Select Case IndexCase 0 If Text1.Text = Then Text1.Text = 0 Else Text1.Text = Text1.Text + 0 End IfCase 1 If Text1.Text = Then Text1.Text = 1 Else Text1.Text = Text1.Text + 1 End IfCase 2 If Text1.Text = Then Text1.Text = 2 Else Text1.Text = Text1.Text + 2 End IfCase 3 If Text1.Text = Then Text1.Text = 3 Else Text1.Text = Text1.Text + 3 End IfCase 4 If Text1.Text = Then Text1.Text = 4 Else Text1.Text = Text1.Text + 4 End IfCase 5 If Text1.Text = Then Text1.Text = 5 Else Text1.Text = Text1.Text + 5 End IfCase 6 If Text1.Text = Then Text1.Text = 6 Else Text1.Text = Text1.Text + 6 End IfCase 7 If Text1.Text = Then Text1.Text = 7 Else Text1.Text = Text1.Text + 7 End IfCase 8 If Text1.Text = Then Text1.Text = 8 Else Text1.Text = Text1.Text + 8 End IfCase 9 If Text1.Text = Then Text1.Text = 9 Else Text1.Text = Text1.Text + 9 End IfCase 10 If Text1.Text = Then Text1.Text = . Else Text1.Text = Text1.Text + . End IfCase 11 num1 = CDbl(Text1.Text) Text1.Text = act = 1Case 12 If Text1.Text = T