VB实验六 数组(1)学生
VB综合实验报告
华北科技学院计算机学院综合性实验实验报告课程名称程序设计语言(VB)实验学期 2015 至 2016 学年第二学期学生所在系部安全工程学院年级 2015级班级安卓B151 学生姓名徐艳强学号 201510044218 任课教师李冬艳实验成绩计算机学院制《程序设计语言（VB）》课程综合性实验报告题目描述如下：在“数学运算”窗体上有一个名称为cmd1、标题为“计算”的命令按钮；两个水平滚动条，名称为hs1和hs2，其max属性均为100，min属性为1；四个标签，名称为lab1、lab2、lab3和lab4，标题分别为“运算数1”、“运算数2”、“运算结果”和空白；此外包含四个单选按钮，标题为“+”、“-”、“*”和“/”。
程序运行后，移动两个滚动条中的滚动框，用滚动条的当前值作为运算数，如果选中一个单选按钮，然后单击命令按钮，相应的计算结果将显示在label4中。
6.单击“退出”菜单，退出程序运行。
四．实验结果及分析1.菜单(1)功能主要功能就是把每个小程序串联起来，使其连续、具有整体性。
分为数组应用、控件应用、过程应用、和退出四个一级菜单。
在数组应用一级菜单下有数组操作二级菜单、控件应用一级菜单下有选择器和数学运算两个二级菜单、过程应用一级菜单下有字符转换二级菜单。
其中一级菜单中，单击退出后实现结束程序的目的，二级菜单对应每个程序，单击二级菜单会实现出现对相应的程序窗体。
(2)界面抓取(3)实现代码Private Sub 数学运算_Click()数学运算窗体.ShowEnd SubPrivate Sub 数组操作_Click()数组操作窗体.ShowEnd SubPrivate Sub 退出_Click()EndEnd SubPrivate Sub 选择器_Click()选择器窗体.ShowEnd SubPrivate Sub 字符转换_Click()字符转换窗体.ShowEnd Sub2.初始界面（1）功能人员分工介绍。
vb6.0实验六习题与答案
vb6.0实验六习题与答案实验六专业_1、认识常用控件：单选按钮、复选框、框架、列表框、组合框、滚动条、滑动器（slider）、时钟、图形控件；2.学习在表单中创建常用控件2、学习在属性窗口和在程序代码中设置属性3、学习调用控件的方法4.学习编写每个控件、鼠标和键盘的事件过程。
二、实验内容1、单选按钮、复选框、框架1）将表格F1的标题设置为“复选框、框架和单选按钮”；将表格中复选框ch1、ch2ch1和CH2的高度和宽度分别设置为360和1000；程序运行时，check2处于非零状态。
FR1帧包含单选按钮OP1和op2。
2）设计窗体，要求①标题为“设置字体”；② 带边框的标签控件Label1以表格形式设置，高度和宽度分别为450和3800，标题为“欢迎VB”，字体大小为“4”，并显示在中间；③标题为“字体”框架包含两个标题分别为“楷体_gb2312”和“华文新魏”的单选按钮op1和op2；④ 标题为“Italic”的框架包含两个标题为“是”和“否”的单选按钮。
⑤ 编写相应控件的事件进程，使程序运行时，点击“Kaiti_gb2312”，标签控件的字体为Kaiti_gb2312，点击“Chinese New Wei”，标签控件的字体为Chinese New Wei；单击Yes，label控件的字体将为斜体。
单击“否”取消标签控件字体的斜体化。
privatesuboption1_click()标签1。
fontname=option1。
说明文字endsubprivatesuboption2_uu单击（）label1.fontname=option2.captionendsubprivatesuboption3_click()label1.fontitalic=trueendsubprivatesuboption4_click()label1.fontitalic=falseendsub3）在窗体是设置设置框text1，其中文字为：黑体、四号、居中；设置单选按钮option1和option2，标题分别为“福州大学”和“阳光学院”，编写行当的事件过程，使得程序时，单击“福州大学”或“阳光学院”，在文本框中显示“福州大学”或“阳光学院”。
VB实验6 动态数组
实验6 动态数组
实验6-1 找因子
1. 功能
找出10～100之间含因子数最多的数，并显示所有的因子（包含1和本身）。
如图6-1所示。
图6-1
2. 要求
（1）在“查找”按钮中设计程序，查找10～100之间含因子数最多的数，并按图6-1所示格式在文本框中显示所有因子。
（2）单击“退出”按钮，将结束应用程序的运行。
3. 保存工程和窗体，并生成EXE文件
将工程保存为P6-1.vbp，窗体保存为F6-1.frm。
将以上工程生成EXE文件，文件名为E6-1.exe。
实验6-2 删除重复数
1. 功能
删除一个数组中的重复数。
如图6-2所示。
图6-2
2. 要求
（1）在“生成”按钮中设计程序，随机生成10个一位正整数，显示在文本框中。
（2）在“删除”按钮中设计程序，删除其中所有的重复数后，将数组元素重新显示在另一个文本框中。
（3）单击“清除”按钮，将清除两个文本框对象。
（4）单击“退出”按钮，将结束应用程序的运行。
3. 保存工程和窗体，并生成EXE文件
将工程保存为P6-2.vbp，窗体保存为F6-2.frm。
将以上工程生成EXE文件，文件名为E6-2.exe。
VB第6章 数组
教案讲稿第六章数组[旧课复习]：复习内容：1.循环语句2.多重循环使用复习目的：学生掌握两种基本循环结构语句的使用以便在数组中能正确使用循环语句复习时长：大约5分钟[新课导入]：导入方式：引入日常生活中的实例让学生理解数组的功能导入目的：增强学生的理解能力导入时长：大约10分钟[新课讲授]：重点：静态数组、动态数组的基本操作及列表框和组合框的使用难点：控件数组方法：运用多媒体辅助教学，采用讲授法和启发式教学法6.1数组的概念6.1.1数组概念数组并不是一种数据类型，而是一组相同类型数据的集合。
用一个统一的名字（数组名）代表逻辑上相关的一批数据，每个元素用下标变量来区分；下标变量代表元素在数组中的位置。
数组中的各个变量称为数组元素，数组中的每个元素用一个唯一的下标（索引）来标识。
如m（5），表示名为m的数组中下标为5的那个元素。
数组元素的个数称为数组的长度（大小）。
数组的各个元素在内存中是连续存放的，如图6-1所示。
数组名表示这个连续数据区域的起始位置，下标表示对应元素在内存区域中的相对位置。
图6-1 数组在内存中的存放方式6.1.2数组的分类Visual Basic中的数组，按不同的方式可分为以下几类：按数组的大小（元素个数）是否可以改变分为：静态（定长）数组、动态（可变长）数组。
按元素的数据类型可分为：数值型数组、字符串数组、日期型数组、变体数组等。
按数组的维数可分为：一维数组、二维数组、多维数组。
对象数组：菜单对象数组、控件数组。
6.2静态数组6.2.1 静态数组的声明1．一维数组静态一维数组的声明格式如下：Dim数组名(下标) [ As <类型> ]说明：（1）数组的命名与简单变量的命名规则相同。
（2）下标的格式为：[<下界> to <上界>]<下界>和<上界>不能使用变量，必须是常量，常量可以是直接常量、符号常量，一般是整型常量。
VB实验报告(示例)
华北科技学院计算机系综合性实验实验报告课程名称计算机技术基础（VB）实验学期 2014 至 2015 学年第 2 学期学生所在系部安全工程学院年级大一专业班级安卓B141 学生姓名曾发镔学号 201401054209 任课教师狐为民算法正确(A)(B)(C)(D) 操作熟练(A)(B)(C)(D)报告规范(A)(B)(C)(D) 程序结构合理(A)(B)(C)(D)实验结果正确(A)(B)(C)(D)实验成绩《计算机技术基础（VB ）》课程综合性实验报告开课实验室： 基础实验室 年 月 日 实验题目 : Visual Basic 综合应用程序开发 一、实验目的 1、 掌握数组的应用： （1）数组的定义（2）数组的基本操作，包括数组的输入输出、数组元素的比较、求平均值、数组的排序等。
2、 会使用过程编程和字符串操作 （1）sub 过程的定义与调用 （2）function 过程的定义调用 （3）字符串的大小写转换操作 3、 掌握基本控件的使用包括常用标准控件的使用，如标签、按钮、文本框、单选按钮、滚动条等。
4、 掌握菜单和工具栏的使用 二、设备与环境 硬件：多媒体计算机软件：Windows 2000以上的操作系统、Visual Basic 集成开发环境 三、实验内容一、先进入欢迎界面，在屏幕上显示"欢迎您使用本程序"。
如（图1）。
并弹出密码框，等待输入密码。
如（图2）。
（图1） （图2）题一的程序代码如下：二、密码正确后进入系统主界面，主界面包括“数组应用”、“过程应用”、“控件应用”和“退出”等菜单，并提供相关工具栏或命令按钮。
如（图3）（图4）（图5）（图3） （图6） 题二的程序代码如下：三、 “数组应用”菜单中包括“数组操作”子菜单，单击此菜单，弹出“数组操作”对话框，如 （图3）所示。
① 开始启动工程时，界面上除“输入”及“返回”按钮之外,其他按钮均不可用（灰色显示）。
VB实验案例(数组)
实验五数组一、控件属性的设置 (滚动条)1、在名称为Forml的窗体上添加一个名称为H1水平滚动条，请在属性窗口中设置它的属性值，满足下列要求：它的最小刻度值为1，最大刻度值为100，在程序运行时鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，滚动框移动10个刻度。
再在滚动条下面画两个名称分别为L1、L2的标签，并分别显示1、100，运行时的窗体如图5-1所示。
工程文件名保存为sy5-1.vbp，窗体文件名为sy5-1.frm。
2、在名称为Form1的窗体上添加一个名称为HS1的水平滚动条，其刻度值范围为1 -100；添加一个命令按钮，名称为C1，标题为"移动滚动框"。
请编写适当的事件过程，使得在程序运行时，每单击命令按钮一次(假定单击次数不多于10次)，滚动框向右移动10个刻度。
程序运行时的窗体如图5-2所示。
要求程序中不得使用变量，事件过程中只能写一条语句。
工程文件名保存为sy5-2.vbp，窗体文件名保存为sy5-2.frm。
3、在名称为Form1的窗体上画一个图片框，其名称为Picture1、一个水平滚动条，名称为HScroll1，和一个命令按钮，名称为Command1，标题为"设置属性"，通过属性窗口在图片框中装入一个图形(文件名为pic1.jpg，位于考生目录下)，图片框的高度与图形的高度相同，图片框的宽度任意(如图1所示)。
编写适当的事件过程，程序运行后，如果单击命令按钮，则设置水平滚动条的如下属性：Min 100Max 1500LargeChange 100SmallChange 10之后就可以通过移动滚动条上的滚动块来放大或缩小图片框。
程序运行后的窗体如图5-3所示。
要求程序中不得使用任何变量。
工程文件名为sy5-3.vbp，窗体文件名为sy5-3.frm。
4、在控件属性1文件夹下有一个工程文件sy5-4.vbp，窗体上有一个圆和一个矩形，还有水平和垂直滚动条各一个。
大学vb 实验作业6 选择结构程序设计
实验六选择结构程序设计
实验时间
实验目的
（1）掌握由IF语句构成的选择结构
（2）掌握由SELECT CASE语句4）学会编写选择结构程序解决实际问题
（5）掌握多重窗体的设计
实验环境
硬件：微型计算机
软件：Microsoft Visual Basic 6.0
实验内容
1、编写程序求出四个数中的最小数（要求用“打擂算法”）。
2、设计程序，分别用IF语句和Select语句实现判断从键盘上输入的某个字符为哪类字符（大写字母、小写字母、数字字符和其它字符）
3、编程实现系统登录程序。（用户名：班级；密码：学号后两位）
4、窗体运行时，鼠标光标是箭头形状，每单击一次窗体，鼠标就变换一种鼠标光标的形状，依次显示鼠标光标的15种形状。
提示：窗体上鼠标光标的形状由窗体的MousePointer属性值决定。
实验小结
VB实验报告1-9
实验一：设计简单的VB 应用程序一、实验目的1．掌握Visual Basic 启动和退出的方法。
2．熟悉Visual Basic 的集成开发环境。
3．掌握Visual Basic 程序设计的基本步骤，了解VB 程序的编写、保存和编译的方法过程。
4．初步了解几个常用基本控件控件（标签、命令按钮和文本框）的使用方法。
二、实验类型综合三、实验时间：2013-3-8四、实验任务1、启动Visual Basic ，然后创建一个“标准 EXE ”工程（保存在D 盘以自己学号命名的文件夹中，文件名和窗体名均为SJT ），并了解Visual Basic 集成开发环境下各组成部分及其作用。
2、编一程序，计算任意输入的正整数的平方根。
3、编写一个应用程序，界面如图1-1所示。
窗体中文字“VB 应用程序！”为一标签控件，单击标题为“放大”的命令按钮，则“VB 应用程序！”的字号放大一号，单击“缩小”按钮则反之；同时，窗体中还有4个含某种指向图案的按钮，若单击某个按钮，则使“VB 应用程序！”向该按钮所指向的方向移动50Twip 。
（提示：四种指向的图案可以在Visual Basic 安装目录中的“…graphics\icon\Arrows ”子目录中找到，名称分别为arw07dn.ico 、arw07lt.ico 、arw07rt.ico 和arw07up.ico ）五、实验要求 写出实验报告，内容是：1、第1小题的操作步骤2、第2、3题1).程序的界面设计。
2).程序主要代码。
3).运行结果（输入与输出）。
4).实验总结。
(写上你自己的总结。
可以从以下几个方面来总结：你在编程过程中花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)图1-1 实验1-2程序运行实验二：数据的输入和输出一、实验目的1．掌握常量和变量、表达式的基本概念和正确书写格式。
2．掌握基本语句（Print语句、赋值语句、Dim语句等）的使用；3、掌握常用函数的正确使用方法；4、掌握数据的动态输入InputBox和信息提示MsgBox的基本使用方法。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
保存:工程文件名"题目1.vbp",窗体文 保存:工程文件名"题目1.vbp", 件名"题目1.frm" 件名"题目1.frm"
题目2 题目2:用Array函数对数组赋值 Array函数对数组赋值
定义一个一维数组,用Array函数输入数组 定义一个一维数组, Array函数输入数组 的元素,再输出数组的每个元素. 的元素,再输出数组的每个元素.
�
返回
题目6 二维数组的输入输出1 题目6:二维数组的输入输出1
定义一个二维数组,按行列输出该二维数 定义一个二维数组, 组.
保存:工程文件名"题目6.vbp",窗体文 保存:工程文件名"题目6.vbp", 件名"题目6.frm" 件名"题目6.frm"
题目7 二维数组的输入输出2 题目7:二维数组的输入输出2
保存:工程文件名"题目3.vbp",窗体文 保存:工程文件名"题目3.vbp", 件名"题目3.frm" 件名"题目3.frm"
题目4 使用动态数组输出Fibonacci数列的 题目4:使用动态数组输出Fibonacci数列的 前n项 要求: 的值通过InputBox函数输入 函数输入, 要求:n的值通过InputBox函数输入,输 出时每行输出5个数. n=30时 出时每行输出5个数.如n=30时,效果如下 图:
'1<=a(i)<=100
For i = 1 To UBound(a) Print a(i); Next i 保存:工程文件名"题目5.vbp", 保存:工程文件名"题目5.vbp",
End Sub
窗体文件名"题目5.frm" 窗体文件名"题目5.frm"
二维数组
二维数组的输入输出1(>>) 二维数组的输入输出1(>>) 二维数组的输入输出2(>>) 二维数组的输入输出2(>>) 杨辉三角形(>>) 杨辉三角形(>>)
数组
一维数组的输入输出(>>) 一维数组的输入输出(>>) 二维数组的输入输出(>>) 二维数组的输入输出(>>)
任务要求
完成【题目1 完成【题目1】,【题目2】,【题目3】, 题目2 题目3 题目6 【题目6】
返回
题目1 题目1:用InputBox函数建立数组 InputBox函数建立数组
定义一个一 维数组,用InputBox函数输入 维数组, InputBox函数输入 数组的元素,再输出数组的每个元素. 数组的元素,再输出数组的每个元素.
题目8 题目8:用二维数组打印杨辉三角形
定义一个二维数组,用于存储杨辉三角形 定义一个二维数组, 的行和列.输出杨辉三角形的前n 的行和列.输出杨辉三角形的前n行.n的 值从键盘输入.(习题6 13) .(习题 值从键盘输入.(习题6-13)
保存:工程文件名"题目8.vbp",窗体文 保存:工程文件名"题目8.vbp", 件名"题目8.frm" 件名"题目8.frm"
保存:工程文件名"题目2.vbp",窗体文 保存:工程文件名"题目2.vbp", 件名"题目2.frm" 件名"题目2.frm"
题目3 输出Fibonacci数列的前 项 题目3:输出Fibonacci数列的前10项 数列的前10
定义一个一维数组,输出Fibonacci数列的 定义一个一维数组,输出Fibonacci数列的 10项 前10项.
保存:工程文件名"题目4.vbp",窗体文 保存:工程文件名"题目4.vbp", 件名"题目4.frm" 件名"题目4.frm"
题目5 使用Rnd函数生成 题目5:使用Rnd函数生成[1,100]之 函数生成[1,100]之 间的数 Option Base 1
Private Sub Form_Click() Dim a(10) As Integer For i = 1 To 10 a(i) = Int(100 * Rnd + 1) Next i Print
使用二维数组输出九九乘法表:将下面的 使用二维数组输出九九乘法表: 九九乘法表存入数组中, 九九乘法表存入数组中,并在窗口中显示 出来.(习题6 .(习题 出来.(习题6-1)
保存:工程文件名"题目7.vbp",窗体文 保存:工程文件名"题目7.vbp", 件名"题目7.frm" 件名"题目7.frm"