vb实验过程范文（精选6篇）
vb实验过程 第1篇
Vb设计实验报告
一、设计内容和目的
这次实验设计，我做的是学生信息管理系统，主要功能是提供学生信息保存和查询功能。
主要分为个窗口，其具体功能如下：
1、登录窗口：提供学生和管理员登录。
2、信息管理窗口：主操作窗口，可以进行重登陆、注销、退出、用户查询、管理员管理、系统信息的操作。包括一个下拉菜单和工具栏。
3、用户查询窗口：可以查询数据库中保存的学生信息。
4、管理员管理窗口：只有管理员可以进入，显示数据库中所有的学生信息，并且可以添加修改。
5、系统信息窗口：是系统的信息内容。
另外，根据网上的代码，我又制作了俄罗斯方块小游戏和画图工具。
二、设计过程：
1、实验构思：在系统设计之前，对实验内容和结构的构思占据了相当一部分时间。最终决定做一个“学生信息管理系统”，这样比较贴近自身情况，也有比较多的内容可以设计。
2、技术实现：在制作过程中主要使用了vb2005和数据库技术实现系统的设计、实现和运行。Photoshop等技术使程序的界面看起来更加友好。
3、运行调试：在系统制作中的运行调试过程中，出现了很多问题，比如各窗口之间的调用和访问，如何退出，控件的背景设置、字体颜色设置等，都需要经过一遍遍的调试发现、解决。
4、系统打包：在打包的时候，我按照老师给的方法一步步设置，可是由于粗心等原因，总是达不到满意的效果，直到第三次才真正成功。
三、系统结构：
如一所述，系统分为5个模块，各个模块之间可以自由访问。
四、实验结果： 该系统能够提供学生和管理员两种类型的登录，可以实现学生信息的查询、管理员对信息的修改，等。
五、设计心得：
在设计过程中，遇到了许多困难，比如：数据库无法连接、窗口无法正常访问、控件背景与窗体背景不协调等。后来通过查看课本和访问网络将这些问题解决了。
在这个过程中，我深深体会到大作业的用意：将所学理论知识用于实践。正是因为这样，许多理论上的知识才能真正得到理解。处理问题的过程，也就是学习的过程。背课本何其简单，真正的能力却是将课本运用到实践中去！
vb实验过程 第2篇
本实验主要练习VB.NET的控件的综合运用。熟悉VB.NET的集成开发环境，掌握VB.NET编程技巧和开发过程。
实验学时数：4学时
二、考核方法及标准
1、考核方法：
本次实验成绩的评定分为三个部分： 出勤
实验完成情况 实验报告完成情况 2、考核标准：
本次实验成绩总分为100分，具体分数分布如表1-1所示。
表1-1 成绩分布情况
每部分的具体评分标准如下：
（1）出勤：迟到扣1分，早退扣1分（在为完成本实验的情况想），否则得满分。
（2）实验完成部分：
未完成，或存在严重缺陷得35分以下； 内容基本完成，但存在小缺陷得36~41分； 内容全部完成，没有错误得42~48分； 内容全部完成并具有创新的加49~60分。
（3）实验报告完成部分：
实验报告内容不完整得0~14分； 实验报告内容基本完整得15~24分；
实验报告内容正确、排版清晰、有条理得25~30分。
三、实验内容
某商店为了迎接“五一”将进行促销活动，促销的商品包括服装、鞋、箱包、化妆品和床上用品五类。在促销期间，每类产品的规定品牌前40件以3折出售，每类产品每人限购1件，售完为止。买这五类产品的促销商品列表如下表：
（1）基本要求：每次在列表框中点击相应的商品时，会显示商品的名称、数量、单价折扣，并把用户所采购的所有商品在文本框内进行汇总，当输入实付款后单击“收款”按钮后计算应找的零钱。
（2）进一步要求：添加菜单，使得对于特价商品的种类、品牌商品、价格和折扣进行编辑。
（3）创新提示：无。要求自行寻找可改进的地方和创新点。
四、思考题
1、什么情况下应该使用Label控件？
2、VB.NET中菜单控件有哪几种类型？是否可以为命令按钮添加上下文菜单？ 3、OpenFileDialog控件和SaveFileDialog控件能否自己打开并读写文件的内容？
vb实验过程 第3篇
关键词：Matlab,VB,过程控制实验,仿真系统
0 引言
过程控制工程[1]实验是某院《检测与过程控制系列课程实验》之一,是自动化专业的一门应用性和实践性很强的主干专业实验课。实验室现有的实验装置虽然控制对象原件全部来源于工业现场,具有真实性、直观性和综合性强的特点,但是其设备大,占用空间大,价格昂贵,台数少,导致学生在进行实验时需要分批分组进行,难以达到较好的实验效果,而且像串级、解耦等复杂控制系统的实验,在实际的实验操作中较难进行,学生实验效果并不明显,而利用仿真系统进行实验能够让学生进一步加深对复杂控制系统的理解。另外设备的长期高负荷运行,导致元器件容易损坏,影响正常的实验教学,因此设计一套相关的仿真系统来辅助实验教学是提高实验教学质量行之有效的方法。
1 设计思路
VB是Microsoft公司推出的应用广泛的可视化编程工具,简单易学且功能丰富,能够迅速有效地编写控制优良的可视化界面,同时避开了C++编程过程中的过分繁琐和抽象的特点[2],是Windows操作系统优秀的可视化编程语言,在用户界面设计和快速开发等方面具有独特的优势。而Matlab是Math Work公司于1984年推出的数学工具软件,其科学计算功能的强大和开放式的开发思想使其成为当今最为流行的、最为优秀的科技应用软件之一,在数值分析、科学计算、算法开发、建模和仿真等方面具有独特的优势,但其用户界面的设计不如VB方便[3]。
本系统利用VB设计控制界面,通过编程语言设计应用过程。在界面处能够实现各模型参数的自由设置,让学生进行参数整定,能够实现实时显示仿真图形并将仿真图形保存等操作,学生也可按照自身的需求显示控制过程的仿真模型和提示信息,以便更好地进行实验,熟练掌握所学的理论知识和方法,丰富操作经验。在VB下通过ActiveX自动化接口可将Matlab作为VB语言的一个ActiveX部件调用,就能够方便使用Matlab软件包simulink,利用simulink较强的对动态系统进行建模、仿真和分析等功能,建立所需的仿真模型,从而实现了通过VB与Matlab的混编设计过程控制实验仿真系统[4,5]。
2 系统的设计与实现
2.1 simulink仿真模型设计
在界面设计之前,必须要对所需的仿真模型进行设计,设置mdl文件的保存路径等,那么用VB在界面设计后进行过程设计时,才能有针对性地进行程序设计,特别是VB与仿真模型交换数据时,需要对应到仿真模型模块的参数名,才能有效地实现数据交换,所以在界面设计之前,设计相应的simulink仿真模型[6,7]有利于界面的设计。
2.2 主界面设计
主界面用于显示需要进行的仿真实验,如图1所示。用框架控件(Frame)设置实验的类型,框架里放置具体的仿真实验,其通过命令按钮控件(Command)调用相关的仿真实验界面窗体,仿真实验界面窗体显示后,主界面隐藏。代码如下:
〈仿真实验界面窗体名〉.show
〈主界面窗体名〉.hide
2.3 仿真实验界面设计
每个仿真实验根据不同的实验内容分别用一个窗体设计不同界面,本界面的设计是整个系统设计的主要部分,承担着调用Matlab,参数设置,仿真图形显示,保存图形等功能。本文以“比例积分微分(PID)作用对系统性能的影响”实验进行设计说明,如图2所示。
本界面主要使用的VB控件有:标签框控件,用于显示标题和P、I、D参数名;文本框控件,用于设置PID参数值;图片框控件,用于显示仿真图形;框架控件,分别用于放置标签框、文本框和图片框控件;命令框控件,用于执行仿真、保存图片、打开仿真模型和返回命令;通用对话框控件,提供一组标准的“另存为”对话框。
整个界面实现的功能是,设置好PID参数后,按仿真按钮,调用simulink仿真模块进行仿真,仿真图形显示在图片框控件,学生可以不断修改PID参数,直至获得满意的仿真图形,然后用自己的名字或学号命名后另存图片到指定的路径,学生还可以查看仿真流程图。复杂的仿真实验还有提示按钮,用于提示学生如何完成好实验。
2.4 VB程序代码
仿真实验界面设计完成后,就要设计界面的过程代码。要实现对Matlab的调用,首先要将Matlab创建为ActiveX对象,其代码为[8]:
Dim Matlab As Object
Set Matlab = CreateObject("Matlab.Application")
在VB应用程序中创建了Matlab 的ActiveX对象以后就可以使用这个对象所包含的各种方法来实现对Matlab的调用。Matlab.Application对象含三个方法,它们是Execute,GetFullMatrix,PutFullMatrix,利用这些方法在VB应用程序内可实现任何Matlab功能[3]。本系统通过Execute调用Matlab功能。
要实现通过VB设置simulink模块的仿真参数,首先建立一个临时文件,将输入文本框参数存入临时文件当中,代码如下:
Open "E:canshu.txt" For Output As #1
Print #1, Text1.Text, Text2.Text, Text3.Text
Close #1
然后通过以下代码,可将临时文件中参数传入simulink仿真模块中:
Matlab.execute ("load("E:canshu.txt)")
Matlab.execute ("load_system(C:MATLAB7worksypid.mdl)")
Matlab.execute ("p=canshu(1);i=canshu(2);d=canshu(3)")
Matlab.execute ("set_param(sypid/Gain1,Gain,p)")
Matlab.execute ("set_param(sypid/Gain2,Gain,i)")
Matlab.execute ("set_param(sypid/Gain3,Gain,d)")
上述代码就可以实现在文本框中对PID参数的设置,然后通过以下代码可以调用simulink进行仿真并将仿真图形显示在界面上:
Matlab.execute ("sim(C:MATLAB7worksypid.mdl)")
Matlab.execute ("plot(ScopeData.time,ScopeData.signals.values)")
Matlab.execute ("saveas(gcf,E:Result.jpg)")
Picture1.Picture = LoadPicture("E:Result.jpg")
“打开仿真模型”和“图片另存为”等程序代码在此不再详述。
最后运行仿真系统,输入PID参数,点击仿真按钮,得到如图3所示的运行结果。
3 结束语
过程控制实验仿真系统可与实物实验相互结合,可以作为学生在实际操作前的课前预习,自行进行对应的仿真实验,加深对理论知识的理解,以便更好地进行实际操作,还可以进行实验装置缺少的改进型过程控制系统实验,扩展学生的知识面,今后还将进一步改进该系统,使其具有更加丰富的内容和功能。
参考文献
[1]郭阳宽,王正林.过程控制工程及仿真[M].北京:电子工业出版社,2009.
[2]曾小勇,朱素芳.VB和MATLAB混合编程的实现与应用[J].计算机控制监测与管理,2005:89-92.
[3]谭炎,张凌燕.MATLAB与VB混合编程技术研究[J].微计算机信息,2005,5(22):247-249.
[4]莫玲芝,王如龙,张锦.基于VB和MATLAB的电化学实验数据处理系统的设计与实现[J].计算机与应用化学,2011,2(28):253-256.
[5]苗敬利,兰娜,等.基于VB和Matlab混编程控制系统稳定性分析[J].微计算机信息,2006,8(22):24-26.
[6]张显库,赵庆涛.Simulink与电路网络的混合仿真[J].计算技术与自动化,2009,3(28):60-62.
[7]哀微,卢明阳.基于LabVIEW和Simulink的过程控制工程虚拟实验平台开发[J].实验室研究与探索,2012,6(31):65-69.
vb实验过程 第4篇
关键词：VB访问Access数据库；超级记忆
“VB访问Access数据库”内容是高中信息技术学科浙教版《算法与程序设计》教材上所没有涉及的，但在《浙江省信息技术学科教学指导意见》中是根据算法与程序设计的发展要求而新增加的内容，属于信息技术新高考识记要求的内容。由于该部分涉及新的概念和术语，如ADO对象、Connection对象、Recordset对象、SQL查询语句等，VB到Access数据库获取数据的计算机处理过程很抽象，学生对相关的程序代码不易理解，而且容易忘记，普遍觉得难教难学。
对初学者而言，读懂VB访问Access数据库的程序代码并非易事，陌生的词句多，语句之间的逻辑和功能不易理解。笔者在教学实践中摸索出一套超级记忆法来破解该教学难题。按照“有图、有序、有理、有趣”的设计原则，将VB访问Access数据库过程进行画图、编故事等设计，更有利于初学者的理解，能增强学生记忆力。
VB访问Access数据库的过程，好比工人到仓库里取东西一样，咱们先来看一个搬运工的故事。
故事情节与主要代码的对比解析：
1.一个名叫VB的工人，从家里出发，到仓库取货，须带上钥匙才能打开仓库大门
ADO（Activex Data Objiects）是微软公司提供的一种应用程序访问数据库的编程接口。该接口包含了多个对象，其中Connection对象用于与数据库的连接，在建立连接后，可以通过Recordset对象获取数据表中数据。
用Connection对象连接数据库的语句：
⑴定义一个数据库连接对象，名为conn
Dim conn As New ADODB.Connection
⑵指定连接到当前目录下的数据库文件
conn.ConnectionString=″provider=Microsoft.ACE.OLEDB.12.0；DATA Source=″ & App.Path & ″＼数据库名.accdb″
⑶打开数据库连接
Conn.open
2.在仓库里，找了个搬运车，来到货柜前，打开货柜的橱门
打开数据库大门后，还要找到相应的数据表（好比储货的橱柜），从表中取得数据，这里要用到记录集对象（Recordset），这个对象好比存放货物的搬运车，可以保存所挑选好的数据。
用Recordset对象获取数据表中数据的语句：
⑴定义一个新的recordset（记录集）对象，名叫rs
Dim rs As New ADODB.Recordset
⑵将实例rs与conn建立关联
Set rs.ActiveConnection = conn
⑶Open方法打开数据表
rs.Open ″select * from 数据表名″
3.在货柜里，从上往下顺序查找，将符合条件的货物取出，有时运气不佳，可能翻见柜底也找不到
查询记录和获取数据，通常采用SQL命令，SQL语句“select * from 数据表名”将查询结果保存到记录集rs中。
4.最后，别忘了“关闭货柜的橱门，关闭仓库的大门”
关闭数据表、数据库的两条语句：
⑴关闭指向数据表的数据集
rs.close
⑵断开跟数据库的数据连接
conn.close
VB实验报告 (2500字) 第5篇
课 程 名 称: 程序设计基础 课 程 代 码: 学院(直属系): 年级/专业/班: 学 生 姓 名:学 号: 实验总成绩: 任 课 教 师: 开 课 学 院: 实验中心名称: 西华大学实验报告（理工类）
开课学院及实验室：交通与汽车工程学院计算机实验室 实验时间： 年 月 日
1、实验目的
a)理解vb中对象的概念。b)理解事件驱动的基本概念。
c)熟悉vb编程的基本步骤：界面设计、属性设置、编写代码、运行、调试、保存文件。
d)掌握常用控件的创建方法以及如何用控件建立用户界面。e)掌握在属性窗口中设置对象属性的基本操作。掌握在代码窗口中编辑程序代码的基本操作。了解在代码中改变对象属性的基本方法
2、实验设备、仪器及材料
操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0
3、实验内容 3.1实验方案设计与选择（设计性、创新性实验需写该项内容）3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）
原理：
vb中对象的操作与应用。步骤：
1.建立界面和对象，更改各个对象的属性;2.编写程序代码，运行程序;3.调试程序，改程序，得正确程序。
3.3实验记录（核心代码及调试过程）
1、界面设计
2、程序代码设计
dim chname as string
chname = text1.text
label1.visible = false text1.move 360, 1440, 4500 text1.forecolor = vbblue text1.text = 这是 & chname & 的第一个vb程序!end sub end sub private sub form_load()showcls form1.fillcolor = vbred print print tab(3);欢迎使用 visual basic！end sub
3、运行/调试程序
4、保存工程
用相关命令在用户文件夹中保存窗体核工程文件，要求文件名分别是;firpro.frm,firpro.vbp
4、实验总结4.1实验结果分析及问题讨论
1若将form_load事件改成form_click事件过程，而其中的程序代码不变，运行程序后
窗体上的显示有什么不同？
答： form_click事件需单击窗体才能触发，而form_load事件由vb系统自动触发，如果改变，则需单击窗体才能显示结果。西华大学实验报告（理工类）
开课学院及实验室：交通与汽车工程学院 计算机实验室 实验时间： 年 月 日
1、实验目的
1.掌握窗体的常用属性、事件和方法。2．掌握是窗体的鼠标事件及触发顺序。
3、掌握颜色的表示方法。
2、实验设备、仪器及材料
操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0
3、实验内容 3.1实验方案设计与选择（设计性、创新性实验需写该项内容）3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）
原理：
通过对各个form事件的了解来进行编程。步骤：
1.先设计界面，进而代码编程； 2.运行程序，结果显示在界面上。3.3实验记录（核心代码及调试过程）。1．
界面设计
2．程序代码设计
private sub form_click()print 触发 form_click 事件 end sub private sub form_dblclick()print 触发 form_dblclick 事件 end sub private sub form_mousedown(button as integer, shift as integer, x as single, y as single)print 触发 form_mousedown 事件 end sub private sub form_mouseup(button as integer, shift as integer, x as single, y as single)print 触发 form_mouseup 事件 end sub 3．运行/调试程序
4．保存工程
4、实验总结
4.1实验结果分析及问题讨论
颜色的表示方法有几种？分别加以描述。
答：1.使用rgb函数
rgb函数可返回一个long整数，来表示一个rgb颜色值。其使用格式如下：rgb(red,green,blue)说明：red,green,blue 3种颜色是通过从0-255之间的一组亮度值组合来设定颜色。2.使用qbcolor函数
qbcolor函数可返回一个long值，用来表示所对应颜色值的rgb颜色码。3.适用系统定义的颜色常数
在vb系统中已经预先定义了常数可查表得起颜色值。4.使用颜色设置值
在十六进制数指定颜色的格式为：&hbbggrr.4.2实验总结心得体会 答：操作时按键的不同会使结果出现差异，体现了不同事件的操作的不同。通过该实验让我比较清楚的了解了form的各个事件。
西华大学实验报告（理工类）开课学院及实验室：交通与汽车工程学院 计算机实验室 实验时间： 年 月 日
1、实验目的
1．掌握标签、文本框、命令按钮的常用属性、事件和方法。
2．掌握单选按钮和复选框、列表框和组合框的编程方法，尤其是单选按钮与框架的配合使用。3．掌握运用图片框和图像框加载图像的方法。4．掌握计时器和滚动条的编程方法。
2、实验设备、仪器及材料
操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0
3、实验内容 3.1实验方案设计与选择（设计性、创新性实验需写该项内容）3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）
原理：
对标签、文本框、滚动条、组合框等控件的应用。步骤： 1.界面设计，2.程序代码编程，3运行，调试，修改。3.3实验记录（核心代码及调试过程）1． 界面设计
2． 程序代码设计 private sub check1_click()if check1.value = 1 then text1.font.bold = true else text1.font.bold = false end if end sub private sub check2_click()text1.font.italic = not text1.font.italic end sub text1.text = 第一章 vb概述 & vbcrlf & 第二章 程序设计基础 & vbcrlf & 第三章 窗体及常用控件 & vbcrlf & 第四章 结构化程序设计 & vbcrlf & 第五章 数组end sub private sub hscroll1_change()text1.font.size = hscroll1.value end sub private sub option1_click()text1.font.name = option1.caption end subprivate sub option2_click()text1.font.name = option2.caption end sub 3． 运行/调试程序
4． 保存工程
4、实验总结
4.1实验结果分析及问题讨论
1、字体的选择可否使用复选框来实现？
答：不可以，字体只能呈现出一种字体，所以只能用单选按钮实现。4.2实验总结心得体会
程序中标点的运用能改变显示的结果，有时会导致不能运行，注意标点很重要。由于编程过程中标点应用不当使我走了很多冤枉路，下次记得标点的使用。西华大学实验报告（理工类）
开课学院及实验室：交通与汽车工程学院 计算机实验室 实验时间： 年 月 日
1、实验目的
1.熟悉vb的各种数据类型 2．掌握变量定义与赋值的方法。3．掌握各种运算符和表达式的使用。4．掌握常用内部函数的功能及其调用方法。
2、实验设备、仪器及材料
操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0
3、实验内容 3.1实验方案设计与选择（设计性、创新性实验需写该项内容）3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）
原理：
对ｖｂ各种数据的应用和内部函数的使用。步骤：
１.对界面进行设计，并改变对象的属性； ２.编写程序代码；
３.运行程序，调试程序，完成程序。
3.3实验记录（核心代码及调试过程）
一、根据输入半径，计算圆的周长和面积。1．界面设计
界面设计如下图所示。
2．程序代码设计 option explicit dim r as single, s as single, area as single r = val(text1.text)s = 2 * pi * r area = pi * r ^ 2 text2.text = s text3.text = area end sub 3．运行/调试程序
程序开始的界面如下图所示。
输入半径后的界面如下图所示。
按“计算”按钮后，显示结果如下图所示。
4．保存工程
二、已知三角形三条边的边长为a、b、c。编写程序计算三角形面积：
面积=s(s?a)(s?b)(s?c)其中：s=（a+b+c）/2 1．
界面设计
界面设计如下图所示。
2．程序代码设计 option explicit private sub form_click()dim a as single, b as single, c as single dim area as single, s as single a = inputbox(请输入a:)b = inputbox(请输入b:)c = inputbox(请输入c:)s =(a + b + c)/ 2 area = sqr(s *(sb)*(si + 1)end if next i text1.text = result end sub 3运行/调试程序
当选择主对角线时，显示结果如下。
当选择主对角线时，显示结果如下。
4．保存工程
4、实验总结
4.1实验结果分析及问题讨论
如果要计算该矩阵四周边线元素之和，主要代码该如何编写? 答：只需将矩阵规律代码做一些改变就行 result = result + a(1，j)and result = result + a(i,1)result=result+a(i,5)and result=result+a(5,j)end if andnext i text1.text = result 4.2实验总结心得体会
这次实验我还是觉得掌握的不好，以后多多努力！
二维数组和矩阵的应用是我的弱项，有时我不知道怎样寻找数据之间的那些规律，我有时很迷茫，vb真的要好好学呀！
西华大学实验报告（理工类）
开课学院及实验室：交通与汽车工程学院 计算机实验室 实验时间： 年 月 日
1、实验目的
1.掌握sub子过程的定义和调用方法。
2．掌握调用过程时参数传递的两种方式（传值与传址）。3．掌握变量、函数和过程的作用域。
4、掌握在数组中找最大（小）值的算法。
2、实验设备、仪器及材料
操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0
3、实验内容 3.1实验方案设计与选择（设计性、创新性实验需写该项内容）3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）
原理：
sub函数的应用，数组中最大最小值的求法等vb编程的应用。步骤： 1.建立界面和对象，更改各个对象的属性;2.编写程序代码，运行程序;3.调试程序，改程序，得正确程序。3.3实验记录（核心代码及调试过程）1．界面设计
2．程序代码设计
a = array(73, 23, 65, 45, 67, 89, 76)for i = 0 to 6 list1.additem a(i)next i call ss(a, x)text1 = x call tt(a, y)text2 = y end sub private sub ss(a as variant, x)x = a(0)for i = 1 to 6 if a(i)> x then x = a(i)end if next i end sub private sub tt(a as variant, y)y = a(0)for i = 1 to 6 if a(i)< y then y = a(i)end if next i end sub a = array(73, 23, 65, 45, 67, 89, 76)for i = 0 to 6 s = s + a(i)t = format(s / 7, 00.#####)text3 = t next i end sub 3．运行/调试程序
4．保存工程
4、实验总结
4.1实验结果分析及问题讨论
如何将平均值保留两位小数？
答：将令av=av/ubound(ar)改为av=0.01*int(100*av)/ubound(ar)即可实现。4.2实验总结心得体会
子函数的应用具有很重要的意义，它在很多方面都在使用，我们遇到要重视它，很多的复杂程序都能通过子函数使程序看起来清晰明白。
本次试验有些问题还没有彻底解决，我想我还要再努力才行。
西华大学实验报告（理工类）
开课学院及实验室：交通与汽车工程学院 计算机实验室 实验时间： 年 月 日
1、实验目的
1.掌握function子过程定义和调用方法。
2．掌握调用过程时参数传递的两种方式（传值与传址）。3．掌握变量、函数和过程的作用域。4.巩固素数的判断的算法。
2、实验设备、仪器及材料
操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0
3、实验内容
3.1实验方案设计与选择（设计性、创新性实验需写该项内容）3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）
原理：
function子过程的使用，素数的判断等vb的程序编写。步骤： 1.建立界面和对象，更改各个对象的属性;2.编写程序代码，运行程序;3.调试程序，改程序，得正确程序。3.3实验记录（核心代码及调试过程）1．界面设计
2．程序代码设计
x = val(inputbox(输入一个6—106间的偶数))loop while x < 6 or x > 106 or x mod 2 <> 0 for i = 2 to x 2 step 1 j = x-i if sushu(i)= 1 and sushu(j)= 1 then picture1.print i & +;j & =;x end if next i end sub private function sushu(n)as integer sushu = 1 k = int(sqr(n))for i = 2 to k if n mod i = 0 then sushu = 0 exit for end if next iend function 3．运行/调试程序
4．保存工程
4、实验总结
4.1实验结果分析及问题讨论
素数的判断可否使用sub子过程来实现？
答：素数的判断可以用sub的子程来实现。4.2实验总结心得体会
子过程可以用来检验许多的著名理论，这有利于我们更深入的学习与探索。由此可见vb作用非同一般呀!很有幸接触到它，让我又有进步。
西华大学实验报告（理工类）
开课学院及实验室：交通与汽车工程学院 计算机实验室 实验时间： 年 月 日
1、实验目的
1.掌握文件以及文件缓冲的概念。
2．掌握顺序文件的打开、关闭以及读写操作。
2、实验设备、仪器及材料
操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0
3、实验内容
3.1实验方案设计与选择（设计性、创新性实验需写该项内容）3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）
原理：
文件的打开、关闭与读写操作等的ｖｂ操作。步骤：
１.对界面进行设计，并改变对象的属性； ２.编写程序代码；
３.运行程序，调试程序，完成程序。3.3实验记录（核心代码及调试过程）1．界面设计
2．程序代码设计 private type st xm as string * 3 zy as string * 5 nl as integer end type option base 1 open app.path + h:试验student.txt for input as #1 no = 1 while not eof(1)no = no + 1 redim preserve stud(no)input #1, stud(no).xm, stud(no).zy, stud(no).nl wend close #1 open app.path + stud计算机应用 for output as #2 for i = 1 to ubound(stud)if stud(i).zy = 计算机应用 then write #2, stud(i).xm, stud(i).zy, stud(i).nl end if next i close #2 open app.path + stud22.txt for random as #3 len = len(stud(1))for i = 1 to ubound(stud)if stud(i).nl >= 22 then put #3, i, stud(i)end if next i close #3 end sub 3．运行/调试程序
4．保存工程
4、实验总结 4.1实验结果分析及问题讨论
如何查看“stud21.txt”和“stud22.txt”两个文件中的数据？
答：直接查看保存工程的文件夹就可以了。4.2实验总结心得体会
这个实验还存在问题，对文件操作还有很多的不足，在学习中还要多努力才行呀
西华大学实验报告（理工类）开课学院及实验室：交通与汽车工程学院 计算机实验室 实验时间： 年 月 日
1、实验目的
1、掌握随机数的产生方法。
2、掌握循环语句的使用。
3、熟悉vb编程的基本步骤：界面设计、属性设置、编写代码、运行、调试、保存文件。
4、掌握常用控件的创建方法以及如何用控件建立用户界面。
5、掌握分支条件语句的使用。
6、掌握各种类型文件的打开、关闭以及读写操作。
7、掌握在代码中改变对象属性的基本方法。
2、实验设备、仪器及材料
操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0
3、实验内容 3.1实验方案设计与选择（设计性、创新性实验需写该项内容）3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）
原理：
对vb各个知识点的综合运用，很有实践价值。步骤： 1.建立界面和对象，更改各个对象的属性;2.编写程序代码，运行程序;3.调试程序，改程序，得正确程序。
3.3实验记录（核心代码及调试过程）1．界面设计
2．程序代码设计
dim a(1 to 20)as integer dim i as integer, j as integer, t as integer a(i)= int(rnd * 21)+ 20 list1.additem a(i)next i end sub for i = 1 to 19 for j = i + 1 to 20 if a(i)> a(j)then t = a(i)a(i)= a(j)a(j)= t end if next j next i list1.clear for i = 1 to 20 list1.additem a(i)next i end sub open testout.txt for random as #1 for i = 1 to 20 put #1, , a(i)next i close #1 end end sub end sub 3．运行/调试程序
4．保存工程
4、实验总结
4.1实验结果分析及问题讨论
1.若“生成”按钮和“排序” 按钮交替有效，代码做如何修改？ 4.2实验总结心得体会
vb程序设计实验心得 第6篇
要求学生在学习该课程中，应用每个相对独立的、完整的单元知识解决一个实际项目，设计编写一个小作品;学完整个课程后，完成一个综合性比较强的编程项目，使学生对整个课程内容进行全面的总结、梳理，以项目完成为手段，全面锻炼学生分析问题和解决问题的能力。
vb程序设计实验心得4篇vb程序设计实验心得4篇
一.目的
1.为使学生掌握编程、面向对象程序设计思想和组建编程的知识实际技能，除了系统地讲授必要的知识，上机练习，做作业外，还应该对学生作较全面的编程技能和分析问题解决问题的能力训练，即作课程设计，以达到如下目的：具体应用和巩固本课程及有关先修课的基础理论和专业知识，了解面向对象程序设计思想，掌握应用编程和组建编程程序设计方法，培养学生初步的项目设计能力。
2.独立地根据一定的项目要求，查阅资料，写出项目开发目标，分析开发过程中所用到的课程知识，提出解决方案，编码并上机调试完成系统，培养学生分析问题和解决问题的能力。课程设计是教学过程中的一个重要环节，必须认真对待。
二.要求
在课程设计中要求学生注意培养认真负责，踏实细致的工作作风和保质保量，按时完成任务的习惯。在设计过程中必须做到：
1.在某个教学单元结束后，完成一个教师布置的、或学生自己拟定的、知识覆盖整个章节的，有一定综合性和难度的项目，要求学生描述出要达到的目标、围绕目标，收集资料和素材，复习所需的课程知识，描述问题解决方案、编写程序上机调试，直到项目的完成。最后的成果要有完成的作品和相应的文档。
2.在课程结束后，完成一个大的编程项目，其要求与课程单元的项目差不多，只是综合性更强、难度更大、知识覆盖面更广，工作量更大，以全面促进学生复习和梳理学科教学内容，提升学生分析问题、解决问题和文档的书写和编制。
三、采取的措施
为了保证课程设计能够按照预定的目标和计划进行，我们还采取了以下措施来加强对学生监督和管理。
1.首先讲清楚课程设计的意义，让学生能够自觉积极主动地进行课程设计，发挥学生的主观能动性;
2.在课程设计过程中，教师随时巡视和监督，了解把握和控制课程设计的进展;
3.将学生的作品集中展示、评价、打分，可以让学生在展示的过程中获得成就感、自豪感，学生之间可以相互学习、取长补短，同时在此过程中可以明确标准，自觉地按照标准来调整自己地学习;
4.将课程设计作为学期成绩的一部分记载，大约占10%，必须完成课程设计后才能参加考试，课程设计不过关，即使考得再好，也不能过。
四、取得的效果
