贵州大学数据库原理及应用的实验报告试题及答案1.pdfVIP

贵州大学实验报告

学院：职业技术学院专业：电子信息科学与技术班级：电科091

姓名学号实验组

实验时间指导教师邬培成绩

实验项目名称vb基本控制结构和选择控件

实

1、掌握选择结构和应用

验2、掌握循环结构和应用

3、掌握单选框、复选框、列表框、组合框、框架的使用

目

4、了解控件数组的应用使用

的

实1、熟悉if语句、for语句的使用

验2、熟悉各控件的属性、方法和事件。

要3、掌握列表框、组合框的添加、删除的方法

求4、按要求完成实验内容。

实

验

1、安装有VB6.0的计算机。

仪

器

1、单选框、复选框、选择结构的使用

实

根据如图所提示的界面，设计一个个人简历表。用户在文本框中输入姓名和年龄，选

验

择性别、职业、学历和个人兴趣等个人信息。单击“提交”按钮运行后在右边的图片框

内

中显示具体的个人信息；单击“重置”按钮，清除输入的信息和所做的选择。

容

1

提示：可以利用框架进行分组，利用单选框的控件数组实现单选框的选择。利用选择

语句实现单选框和复选框的选取判断。

2

2、循环结构的应用

利用循环嵌套完成九九乘法表。界面如图所示。单击打印在图片框中打印出乘法表，

单击退出，退出程序。

提示：用for循环的双重嵌套来实现。使用picture1.print方法实现图片框的打印。

3、列表框的使用、循环结构的使用

新建一个工程，完成“偶数迁移”程序的设计。界面如下图：

有两个列表框List1和列表框List2，单击“产生”按钮（Command1），计算机产生

10个两位正整数放入列表框List1中。同时清空列表框List2中的内容。单击“选

择”按钮（Command2），将列表框List1中所有偶数迁移到列表框List2中，并按数

字大小排列，最后，将统计的个数显示在文本框中。

3

界面设计图

运行效果图

提示：1、利用循环语句完成list1的赋值，使用Rnd函数随机产生10个两位数,产生

产生一个[N,M]范围内的整数int（rnd*（m-n+1）+n）2、使用if语句和循环语句来控

制复制到list2中的数据。2、使用list2.additem完成数据的赋值。

4

4、组合框和列表框的使用

完成一个选课系统的设置，界面如图所示。

有两个界面，第一个界面如图，两个组合框分别可以选择年级和专业，当选

择了09级，电子信息科学与技术专业，单击确定按钮，弹出第二个界面。

第二个界面为选课界面。界面有两个列表框，list1显示可以选择的课程，

选中课程后，单击选择按钮，或者双击该课程，课程就复制到list2列表框

中。（限定最多只能选择3门课程，超过则弹出提示框）。单击重选则清除

list2中的内容。单击删除按钮则删除list2中已经选中的内容。

提示：窗体的加载利用form2.show实现。列表框的添加利用list2.additem