vb实验报告

实 验 报 告 三

课 程 专业班级 姓 名 VB程序设计 实验项目 VB数组应用(6学时) 成 绩 学 号 实验日期 实验目的

（1）掌握一维数组（静态、动态）定义及使用 （2）掌握二维数组（静态、动态）定义及使用 （3）掌握“控件数组”的使用

（4）掌握数组相关算法（求最值，排序，查找） （5）通过数组巩固循环及多重循环程序设计

实验内容

【实验1】对一维数组A(1 to 10)先赋值1、3、5、7、9、11、13、15、17、19，然后再输出。程序运行界面如下图所示。（5分）

掌握一维静态数组的定义及使用

实验结果：

【实验1 代码】

【实验1 典型结果】

【实验2】用Array函数对一维数组进行赋值，程序运行界面如下图（5分）

1

掌握一维动态数组的定义及使用

实验结果：

【实验2 代码】

【实验2 典型结果】

【实验3】动态数组声明及输入输出，程序运行界面如下图所示。（10分）

掌握动态数组的使用

实验结果：

【实验3 代码】

【实验3 典型结果】

【实验4】静态声明一个二维数组，输入和输出该数组各元素的值 （10分） 要求：1.计算并输出数组主对角线和次对角线元素的和。

实 验 报 告 三

课 程 专业班级 姓 名 VB程序设计 实验项目 VB数组应用(6学时) 成 绩 学 号 实验日期 实验目的

（1）掌握一维数组（静态、动态）定义及使用 （2）掌握二维数组（静态、动态）定义及使用 （3）掌握“控件数组”的使用

（4）掌握数组相关算法（求最值，排序，查找） （5）通过数组巩固循环及多重循环程序设计

实验内容

【实验1】对一维数组A(1 to 10)先赋值1、3、5、7、9、11、13、15、17、19，然后再输出。程序运行界面如下图所示。（5分）

掌握一维静态数组的定义及使用

实验结果：

【实验1 代码】

【实验1 典型结果】

【实验2】用Array函数对一维数组进行赋值，程序运行界面如下图（5分）

1

掌握一维动态数组的定义及使用

实验结果：

【实验2 代码】

【实验2 典型结果】

【实验3】动态数组声明及输入输出，程序运行界面如下图所示。（10分）

掌握动态数组的使用

实验结果：

【实验3 代码】

【实验3 典型结果】

【实验4】静态声明一个二维数组，输入和输出该数组各元素的值 （10分） 要求：1.计算并输出数组主对角线和次对角线元素的和。

实 验 报 告 三

课 程 专业班级 姓 名 VB程序设计 实验项目 VB数组应用(6学时) 成 绩 学 号 实验日期 实验目的

（1）掌握一维数组（静态、动态）定义及使用 （2）掌握二维数组（静态、动态）定义及使用 （3）掌握“控件数组”的使用

（4）掌握数组相关算法（求最值，排序，查找） （5）通过数组巩固循环及多重循环程序设计

实验内容

【实验1】对一维数组A(1 to 10)先赋值1、3、5、7、9、11、13、15、17、19，然后再输出。程序运行界面如下图所示。（5分）

掌握一维静态数组的定义及使用

实验结果：

【实验1 代码】

【实验1 典型结果】

【实验2】用Array函数对一维数组进行赋值，程序运行界面如下图（5分）

1

掌握一维动态数组的定义及使用

实验结果：

【实验2 代码】

【实验2 典型结果】

【实验3】动态数组声明及输入输出，程序运行界面如下图所示。（10分）

掌握动态数组的使用

实验结果：

【实验3 代码】

【实验3 典型结果】

【实验4】静态声明一个二维数组，输入和输出该数组各元素的值 （10分） 要求：1.计算并输出数组主对角线和次对角线元素的和。

《VB程序设计》实验单元一

实验报告

专业班级： 姓名 学号 指导教师： 完成时间：

实验 一VB环境和可视化编程基础

一、 实验目的

1 了解Visual Basic的安装 2 掌握启动与退出Visual Basic

3 掌握建立、编辑和运行一个简单应用程序的全过程 4 掌握基本控件的使用

二、实验环境

VB6.0

三、实验内容

1、编写一程序，在文本框中统计在该窗口上鼠标单击的次数。

提示：对窗口编写两个事件：Form_Load事件对文本框初值设为空；Form_Click事件对文本框计数。 对文本框计数：Text1=Val(text1)+1 。 2、命令按钮、字号、内容和格式的复制练习。

按钮1：使得Text1中的文本按要求改变。

按钮2：将Text1中选定的文本复制到Text2. 控件名 Form1 Label1 Label2 Text1 属性 Caption=”实验2” 复制文本 输入文本 Text=“VB功能强大，但要下功夫学习才

实 验 报 告 三

课 程 专业班级 姓 名 VB程序设计 实验项目 VB数组应用(6学时) 成 绩 学 号 实验日期 实验目的

（1）掌握一维数组（静态、动态）定义及使用 （2）掌握二维数组（静态、动态）定义及使用 （3）掌握“控件数组”的使用

（4）掌握数组相关算法（求最值，排序，查找） （5）通过数组巩固循环及多重循环程序设计

实验内容

【实验1】对一维数组A(1 to 10)先赋值1、3、5、7、9、11、13、15、17、19，然后再输出。程序运行界面如下图所示。（5分）

掌握一维静态数组的定义及使用

实验结果：

【实验1 代码】

【实验1 典型结果】

【实验2】用Array函数对一维数组进行赋值，程序运行界面如下图（5分）

1

掌握一维动态数组的定义及使用

实验结果：

【实验2 代码】

【实验2 典型结果】

【实验3】动态数组声明及输入输出，程序运行界面如下图所示。（10分）

掌握动态数组的使用

实验结果：

【实验3 代码】

【实验3 典型结果】

【实验4】静态声明一个二维数组，输入和输出该数组各元素的值 （10分） 要求：1.计算并输出数组主对角线和次对角线元素的和。

实 验 报 告 三

课 程 专业班级 姓 名 VB程序设计 实验项目 VB数组应用(6学时) 成 绩 国际经济与贸易1501 邓成元 学 号 201531100828 实验日期 实验目的

（1）掌握一维数组（静态、动态）定义及使用 （2）掌握二维数组（静态、动态）定义及使用 （3）掌握“控件数组”的使用

（4）掌握数组相关算法（求最值，排序，查找） （5）通过数组巩固循环及多重循环程序设计

实验内容

【实验1】对一维数组A(1 to 10)先赋值1、3、5、7、9、11、13、15、17、19，然后再输出。程序运行界面如下图所示。（5分）

掌握一维静态数组的定义及使用

实验结果：

【实验1 代码】 Option Base 1

Dim A(1 To 10) As Integer Private Sub Command1_Click() Dim i As Integer For i = 1 To 10 A(i) = 2 * i - 1 Next i End Sub

1

Private Sub Command2_Click() Dim i As Integer Fo

实 验 报 告 二

课 程 VB程序设计 实验项目 VB控制结构程序设计(6学时) 成 绩 专业班级 石油工程2015级国际班 姓 名 周夕航 学 号 201531010423 实验日期 2016/04/12 实验目的

（1）掌握分支结构（if、if else、select case）语句

（2）掌握基本循环控制结构（For-Next、While-Wend、Do-Loop）语句 （3）掌握循环嵌套结构 （4）掌握素数算法

（5）能综合运用循环控制结构解决较复杂的问题

实验内容

一、选择结构程序设计

【实验3-1】编写一个“系统登录”程序，对用户输入的账号和密码进行检验。（10分） 要求：

① 账号不超过6位数，密码为4位字符，本题的密码假设为“majq”。

② 账号中不能有非数字字符，可以通过IsNumeric函数对文本框中的输入内容进行测试。

③ 密码输入时，屏幕上不能显示输入字符，以“*”代替。

④ 当输入不正确时，显示提示信息。若单击“重试”按钮，则清除原输入内容，焦点定位在原输入的文本框中，重新输入；若单击“取消”按钮，则停止程序的运行。

⑤ 密码检验运行界面和输入密码错误显示的信息分别如图3-2和图3-3所

交通与汽车工程学院 实 验 报 告

课 程 名 称: 程序设计基础 课 程 代 码: 学院(直属系): 年级/专业/班: 学 生 姓 名:学 号: 实验总成绩: 任 课 教 师: 开 课 学 院: 实验中心名称: 西华大学实验报告（理工类）

开课学院及实验室：交通与汽车工程学院计算机实验室 实验时间： 年 月 日

1、 实验目的

a) 理解vb中对象的概念。 b) 理解事件驱动的基本概念。

c) 熟悉vb编程的基本步骤：界面设计、属性设置、编写代码、运行、调试、 保存文件。

d) 掌握常用控件的创建方法以及如何用控件建立用户界面。 e) 掌握在属性窗口中设置对象属性的基本操作。 掌握在代码窗口中编辑程序代码的基本操作。 了解在代码中改变对象属性的基本方法

2、 实验设备、仪器及材料

操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0 3、实验内容 3.1实验方案设计与选择（设计性、创新性实验需

(此文档为word格式，下载后您可任意编辑修改！)

台州学院

《VB程序设计》实验报告

实验1.1 设计一个程序，程序运行的初始界面如图1-1所示。当单击“显示”按钮时，在文本框中显示“欢迎使用VB！”（图1-1）；当单击“清除”按钮时，清除文本框内的文本；当单击“退出”按钮时，结束程序运行。 Private Sub Command1_Click() Text1.Text = \欢迎使用VB！\End Sub

Private Sub Command2_Click() Text1.Text = \End Sub

Private Sub Command3_Click() End End Sub

实验1.2 设计一个程序，程序运行的初始界面如图1-3所示，其中“显示”按钮为不可用。同时要求：

（1）当单击“改变文字”按钮时，在左边标签文字内容改为“你好，张三！”，同时“改变文字”按钮变为不

1 可用（图1-4）；

（2）当单击“隐藏”按钮时，将左边标签设为不可见，同时“隐藏”按钮变为不可用，“显示”按钮变为可用（图1-5）；

（3）当单击“显示”按钮时，重新显示左边标签，同时“隐藏”按钮变为可用，“显示”

Privat

湖北文理学院

VB程序设计课程

实验报告

学 院 物电学院 专 业 自动化 班 级 1211 学 号 姓 名 王亮 任课教师 王福林

实验一、VB控制结构

一、实验目的

1.掌握选择语句的使用 2.掌握循环语句的使用

二、实验内容

1、选择语句

程序1：创建应用程序。要求：单击窗体可弹出输入框，任意输入三个数，然后按从小到大的顺序输出到窗体上。

程序2：创建应用程序。要求：单击窗体可弹出一输入框，任意输入一个正整数，在窗体上显示该整数是否为素数的字样。

2、循环语句

程序3：创建应用程序。要求：单击窗体可显示一个由“*”组成的平行四边形图案。

程序4：创建应用程序，其功能是显示所有的水仙花数。

三、实验记录

程序1如下：

Private Sub Command1_Click()

Dim a As Integer, b As Integer, c As Integer, t As Integer '定义a,b,c,t为整形变量

Cls