VB实验实验报告 - 2016

实验报告三

实验目的

（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分）

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

实验结果：

【实验2 代码】

【实验2 典型结果】

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

掌握动态数组的使用

实验结果：

【实验3 代码】

【实验3 典型结果】

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

2.交换1、3行后输出整个数组的值

3.交换数组的行与列后输出整个数组的值

12345678910111213141516171819202122232425??

???

????

???????

掌握二维数组的定义及使用

实验结果：

【实验4 代码】

【实验4 典型结果】

【实验5】利用控件数组模拟电话拨号程序，界面设计如图4-4所示。要求按任意一个字符，在文本框中显示，最多可拨11位数字字符，单击“重拨”按钮，重新显示原来所拨的号码。 建立Command1控件数组，索引为0－9；Command2和Command3分别为“重拨”、“清屏”按钮；Timer1控件为“重拨”服务。（10分）

掌握控件组的使用

实验结果：

【实验5 代码】

【实验5 典型结果】

【实验6】随机产生10个100－999之间的数以递增顺序存放在列表框中，并实现对列表框内数据插入、删除等操作，使得列表框内数据还是有序。程序运行界面如下图所示（10分）

掌握数组插入与删除操作

实验结果：

【实验6 代码】

【实验6 典型结果】

【实验7】设计一个利用简单组合框对各省、直辖市名称维护的应用程序。要求：添加不重复的省或直辖市到组合框中，对不正确的可修改，以按汉字内码顺有序显示。运行效果如下图所示。（10分）

掌握数组常用算法：插入与删除操作

实验结果：

【实验7 代码】

【实验7 典型结果】

【实验8】用比较法对数组中的元素按升序排列，程序运行界面如下图所示。（10分）

掌握数组常用算法：数组排序

实验结果：

【实验8 代码】

【实验8 典型结果】

【实验9】选择法对数组中的元素按升序排列，程序运行界面如下图所示。（10分）

掌握数组常用算法：数组排序

实验结果：

【实验9 代码】

【实验9 典型结果】

【实验10】用冒泡对数组中的元素按升序排列，程序运行如下图所示。（10分）

掌握数组常用算法：数组排序

实验结果：

【实验10 代码】

【实验10 典型结果】

【选做1】利用一维数组，统计一个班学生成绩0~59，60~69，70~79，80~89，90~100各分数段的人数，生成一个各分数段的柱状图。人数为运行时输入，成绩给定方法要求为键盘输入。（5分）

掌握控件数组的使用

实验结果：

【选做1代码】

【选做1典型结果】

【选做2】从键盘输入10个整数，存放在一个一维数组中，然后将前5个元素与后5个元素交换，即第1个与第10个交换，第2个与第9个交换……（5分）

掌握一维数组的使用

实验结果：

【选做2代码】

【选做2典型结果】

实验小结

1.遇到的问题：

2.对课程的建议：

VB实验报告

VB实验报告 实验一、VB控制结构 [实验目的] 1.掌握选择语句的使用 2.掌握循环语句的使用 [实验内容] 一、VB编程基础 练习：在应用程序的代码窗口中分别输入以下四段代码，当程序运行 时在窗体上单击，分别会发生什么情况，为什么？ ①Private Sub Form_Click() I = 10 Print I End Sub ②Private Sub Form_Click() Dim I% I = 10 Print I End Sub ③Option Explicit Private Sub Form_Click() I = 10 Print I End Sub ④Option Explicit Private Sub Form_Click() Dim I% I = 10 Print I

End Sub 第一个程序运行的结果是： 点击一次窗体便会出现一个“10” 第二个程序的运行结果是： 也是点击一次窗体出现一个“10” 第三个程序运行的结果是：无法运行，显示变量未定义第四个程序运行的结果是：

在应用程序的代码窗口中分别输入以下两段代码，当程序运行时在窗体上反复单击，分别会发生什么情况，为什么？ Private Sub Form_Click() Dim n As Integer n = n + 1 Print n End Sub Private Sub Form_Click() Static n As Integer n = n + 1 Print n End Sub 第一个程序运行结果是： 第二个程序运行的结果是：

二、选择语句 程序1：创建应用程序。要求：单击窗体可弹出输入框，任意输入三个数，然后按从小到大的顺序输出到窗体上。 Private Sub Text1_Change() Dim X1 As Single, X2 As Single, X3 As Single, Temp As Single '定义x1,x2,x3,temp X1 = CSng(InputBox("请输入第1个数：", "输入数据")) '弹出请求输入数据x1的文本框 X2 = CSng(InputBox("请输入第2个数：", "输入数据")) '弹出请求输入数据x2的文本框 X3 = CSng(InputBox("请输入第3个数：", "输入数据")) '弹出请求输入数据x3的文本框 If X1 > X2 Then Temp = X1: X1 = X2: X2 = Temp '比较x1,x2,若x1大于x2将两值交换 End If If X1 > X3 Then Temp = X1: X1 = X3: X3 = Temp '比较x1,x3,若x1大于x3将两值交换 End If If X2 > X3 Then Temp = X3: X3 = X2: X2 = Temp '比较x2,x3,若x2大于x3将两值交换 End If Print: Print Print "输出结果：" ’在屏幕上输出“输出结果：” Print Print x1,x2,x3 ’在屏幕上输出x1,x2,x3 End Sub

VB实验报告8

台州学院 《VB程序设计》实验报告实验八：图形的绘制 班级：14制药3班 学号： 姓名： 实验日期：2015.6.5

一、实验目的和要求 1．掌握Visual Basic 容器坐标系的设计方法； 2．熟练掌握Pset、Line和Circle方法的格式及其使用； 3．掌握与图形有关的常用属性，方法。 二、实验主要仪器和设备 计算机一台，Windows XP / Win7操作系统，Visual Basic环境。 三、实验内容 实验8.1 下列程序运行时，先输入各公司月销售额，然后单击命令按钮，图片框中将显示各公司销售额的圆饼图（如图8-1所示）。要求：在文本框中只能输入数字字符；在圆饼图中分别用红、绿、篮色显示A、B、C公司的扇区填充色。 图8-1 程序运行时的界面 四、实验原始纪录 实验8.1 程序的界面设计。

程序代码。 Const pi = 3.1415926 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer, d As Integer a = Text1.Text b = Text2.Text c = Text3.Text d = a + b + c Picture1.FillStyle = 0 Picture1.FillColor = vbRed Picture1.Circle (2000, 2000), 1000, vbBlack, -2 * pi, -(a / d) * pi * 2 Picture1.FillColor = vbGreen Picture1.Circle (2000, 2000), 1000, vbBlack, -(a / d) * pi * 2, -((a + b) / d) * pi * 2 Picture1.FillColor = vbBlue Picture1.Circle (2000, 2000), 1000, vbBlack, -((a + b) / d) * pi * 2, -pi * 2 End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0 End If End Sub Private Sub Text2_KeyPress(KeyAscii As Integer) If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0 End If End Sub Private Sub Text3_KeyPress(KeyAscii As Integer) If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0 End If End Sub 五、实验结果及分析 实验8.1运行结果。

VB实验报告(含答案)

实验报告 课程名称_程序设计基础Visual Basic_ 班级______ _____＿姓名_____ ____

实验一 VB环境和创建一个简单的VB程序 一．实验目的： 1.了解VB系统对计算机软件、硬件的要求。 2.掌握启动和退出VB的方法。 3.了解和使用VB集成开发环境各窗口、菜单的一般功能。 4.熟悉建立、编辑、运行、保存一个简单的VB应用程序的全过程。 5.了解文本框、标签框、命令按钮的构造及其属性、事件和方法。 二．实验内容： 1．设计一个简单的应用程序，要求在窗体上画一个文本框、一个标签和两个命令按钮编一程序，并把命令按钮分别设置为”显示”和”清除”。程序运行后，单击”显示”按钮，在文本框中输出一行信息；单击”清除”按钮，则清除文本框中的内容，运行界面如图所示。 图实验1-1 运行界面 三．实验结果：对象属性设置 对象属性属性值说明 caption我的第一个vb程序窗体Form1 caption请输入姓名标签Label1 text““文本框Text1 caption显示命令按钮Command1 caption清除命令按钮Command2 四．实验思考： 1.标签label控件设置的属性代码有哪些 =“请输入姓名” =24 =True 2.两个按钮所使用的是什么事件代码分别是什么 Private Sub Command1_Click() =“姓名”

实验二简单程序设计数据类型及常用内部函数的简单应用 一．实验目的： 1．掌握Visual Basic数据类型的基本概念。 2．掌握用Visual Basic的各种运算符及表达式。 3．学习使用Visual Basic内部函数和数据输入、输出方法。 4．掌握命令按钮、文本框和标签。 5．设计顺序程序。 二．实验内容： 1．编写一个华氏温度和摄氏温度之间的转换程序，如图2-2所示,要求用inputbox函数输入华氏温度，用msgbox输出转换后的摄氏温度。转换公式是：C= 5 / 9(F - 32)。F为华氏温度，C为摄氏温度。 2.用三种除法运算（/ 、\、Mod）做计算。 要求:在窗体上画五个标签、五个文本框和一个命令按钮，如图2-2所示。程序运行后，在第一个文本框中输入被除数，在第二个文本框中输入除数，然后单击命令按钮，即可得到三种不同的相除结果。 图2-1 图2-2 三．实验结果：对象属性设置 1.温度转换 对象属性属性值说明 Form1Caption Inputbox与msgbox窗体

VB实验报告一

本科实验报告 课程名称：人机界面程序设计基础 实验项目：一、VB环境和可视化编程基础实验地点： 专业班级：学号： 学生姓名： 指导教师：李何 年月日

一、实验目的和要求 1、掌握启动与退出Visual Basic的方法。 2、掌握建立、编辑和运行一个简单的Visual Basic应用程序的全过程。 3、掌握定义变量、常量的方法；了解运算符和表达式的使用；熟悉内部函数。 4、掌握基本控件的应用。 二、实验内容和原理 1、编写一程序，在文本框中统计在该窗口上鼠标单击的次数。 提示：使用Form_Click事件；文本框计数Text1=Val(Text1)+1。 2、使用Print方法，掌握“，”和“；”的区别；以及Spc（n）函数、Tab(n)函数、属性Current X和Current Y的定位输出。 3、编写一程序，在标签上实时显示系统时间，系统时间要求00:00:00AM/PM格式 提示：使用Timer控件、Format函数和Now函数。 4、对教材上例4-13进行改动，用输入框函数完成输入，用消息框函数显示结果。 5、使用Len()函数、LenB()函数、Rnd函数和Randomize语句、Shell函数，并对运行结果进行分析。 三、主要仪器设备 计算机

四、实验步骤 1、编写一程序，在文本框中统计在该窗口上鼠标单击的次数。 提示：使用Form_Click事件；文本框计数Text1=Val(Text1)+1。 打开VB软件，建立标准exe，在窗体设计器中添加Command1，更名为“按钮” 添加text1，删掉名称。 双击按钮，编写程序如图

VB课程实验报告

山西财经大学《程序设计（VB+Acces）》实验报告 ＊＊＊＊年＊月＊＊日实验题目1选择结构程序设计 选课课号2015-2016-2-N081002S00-08034- 学院 ＊＊＊＊＊ 学院 班 级 ＊＊＊＊＊＊＊ 姓名＊＊＊ 学 号 ＊＊＊＊＊＊＊＊＊ 理论课教师李平珍 上机指 导教师 李平珍 实验目的及要求： 1．掌握条件表达式和分支语句 2．正确使用If．．．Then．．．Else和If．．．Then．．．ElseIf等语句3．使用选择性控件实现程序应用 编写以下程序段： 求一元二次方程ax2+bx+c=0的根 设计一个四则运算计算器 实验的详细操作步骤、程序代码及运行截图： 一． Private Sub Command1_Click() Dim A As Single, B As Single, C As Single Dim R1 As Single, R2 As Single A = Val B = Val

If B ^ 2 - 4 * A * C < 0 Then MsgBox "该方程无解." ElseIf B ^ 2 - 4 * A * C = 0 Then R1 = -B / 2 / A MsgBox "该方程仅有一个根为" & R1 & "." Else R1 = (-B + Sqr(B ^ 2 - 4 * A * C)) / (2 * A) R2 = (-B - Sqr(B ^ 2 - 4 * A * C)) / (2 * A) MsgBox "该方程有两个根分别为" & R1 & "和" & R2 & "." End If End Sub 二． Private Sub cmdCal-Click() Dim x1 As Single,sign As String,x2 As Single X1=Val(txtA):sign=txtB:x2=Val(txtC)

VB实习心得体会

篇一：vb实习体会 vb实习体会 我对于visualbasic的学习，是从初中开始的。当时舟山市的中考政策有考级加分制度，考出全国二级能加10分。在此诱惑下报名参加培训班，考了两次，第一次笔试未通过，第二次才全通过。虽然考了两次，但是那时候已经能够编出几个没有什么逻辑性可言的小小游戏了。所以这次认识实习，对我来说难度并不大。然而由于选课上面的原因，认识实习和电子实习冲突，导致我没有上过一节认识实习课。所以我的vb水平基本没有什么进步，这个五子棋，也是建立在初中的经验上的。 vb本身也不是很难。尤其在gui编程上能够体现出来。我接触过几种gui的编程，桌面应用里面有swing、qt库的编程，另外还有android和j2me的编程。这些程序在gui开发上面虽然不能说难，但代码量也是很大的（qt和android有可视化辅助设计，稍微好一点）。而微软确实对程序员比较照顾，出了很多的编程方式都比较简易，比如windowsform式的编程，这在vb和c#上体现的非常到位，大大降低了程序员的门槛。值得一提的是，我初中的学校，超过三分之一的人通过了全国计算机等级考试二级vb，可见vb的简单程度。 虽然vb很简单，但说实话我不太喜欢vb。一方面是长期接触类c语法，让我对于类c语法的语言比较偏爱（java、c++、php等）。另一方面是vb是一种windowsonly的语言，可移植性比较差。 而从业界发展的视角来看，随着苹果焕发第二春以及google的崛起，微软的势力开始萎缩。在终端方面，高端智能手机以及平板电脑正悄悄取代个人pc机的地位。而互联网云计算的概念更加使得这些终端设备能够替代传统pc。而微软在这方面几乎可以被称作是惨败的。所以，开发windows桌面应用渐渐显得不入时，况且是用可移植性非常差的vb6来开发。 如果要我选择桌面应用程序开发工具的话，我恐怕会选择c#。它既有 windowsform的编程方式，拥有https://www.wendangku.net/doc/4e15369940.html,的几乎所有的便利特性，而且是类java语法，使得程序员能够非常快的适应。另外，.net的可移植性比较强。c#运行在.net平台上，理论上可以像java那样易于移植，而且在linux上也出现了mono这样的开源版本。而vb6则不行。当然，语言的问题总是微乎其微的。这一次实习最大的收获应该是大致了解了五子棋程序的原理。比如说怎么判断五子连珠等等。虽然没有更上一层楼编出ai，但是总的来说，这是我第一次用vb开发出一个像样点的游戏了。篇二：vb实训个人总结 vb实训个人总结 在这一周的实习中，使我学到了好多书本上没有的知识，更让我对vb有了更深一步的掌握，同时也发现了许多自己在学习方面的不足，取长补短，互相学习，共同进步，我们不但学习了知识，更好的证明了实践是检验真理的唯一标准。培养和提高我们的实际操作和应用能力，在学习vb后，具体的是使我们熟悉并使用各种类和各种vb控件的应用，在编写程序的过程中我们还专门编写了注释以便于修改程序！这些内容使我们更加熟练的应用这门语言，给自己以后能够走上工作岗位打下良好的基础！ 实训的第一天接到任务时我们都觉得有点难度，很有挑战性，毕竟学籍信息管理系统是一个比较系统、完善、功能相对较齐全的管理系统，即使是用户模块也可以完成各种操作，如对用户的查询、添加.删除以及修改等。因此程序编写也十分复杂，工作量较大，编写一定要认真。一个小小的失误都可能使程序出现大的漏洞。而我们只是学了点简单的vb程序编写，没有尝试过这种相对来说比较系统完善的系统。所以在做项目的时候我们倍感压力、更加的团结协作，可即使如此我们还是出现了错误，我们的程序在编写上存在一些漏洞，导致调试时不能正常运行，后经过老师的指导、我们的调整，终于可以完美的运行， 我做的是学籍信息管理系统，但是在编写程序的时候也遇到了很多难懂的问题，有的是实践能力差，有的是对书本上的内容太过于模糊，有的是什么也不知道，当中有说不出口的味道。

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

大学学生实验报告 开课学院及实验室：地理科学学院2014年4月1日

表A_1 对象属性设置 控件名属性 Form1 Caption=”实验A_1” Label1 Caption=”欢迎学习VisualBasic”;Font属性:字号为二号,字体为隶书 Label2 Caption=”请输入你的”Font属性:字体为楷体,有下划线 Text1 Text1=”” Command1 Caption=”” Label3 Caption=””,BorderStyle=1 ④窗体界面设计如图1： 图1 实验A_1窗体界面设计 ⑤代码设计如图2： 图2实验A_1代码设计 （3）实验结果

①运行结果如图3： 图3实验A_1运行结果 ②保存文件如图4： 图4实验A_1文件保存 A_2 （1）实验容：模仿教材例1.1，将事件过程自上而下移动改为自右向左移动，也要考虑文字出窗体边界的情况。各控件及属性窗口的设置参见表格A.2，背景图形文件可以选择自己喜欢的，按钮上的图标通过Windows 搜索功能查找。以Sy1-2为项目名保存。 （2）实验步骤： ①创建一个“标准EXE”工程； ②在窗体上添加标签Label1、命令按钮Command1和Command2及Timer1； ③设置对象属性；

表A_2 对象属性设置 控件名属性 Form1 Caption=”实验A_2”;Picture:为你喜欢的图片 Label1 Caption=”我开始学习程序设计”;Fontsize=36 Command1 Caption=””;Style=1;Piciture=”clock02.ico”;ToolTipText=” 自动” Command2 Caption=””;Style=1;Piciture=”key04.ico”;ToolTipText=” 手动” Timer1 Internal=0 ④窗体界面设计如图5： 图5 实验A_2窗体界面设计 ⑤代码设计如图6：

VB实验报告 (2500字)

交通与汽车工程学院实验报告 课程名称: 程序设计基础课程代码: 学院(直属系): 年级/专业/班: 学生姓名:学号: 实验总成绩: 任课教师: 开课学院: 实验中心名称: 西华大学实验报告（理工类） 开课学院及实验室：交通与汽车工程学院计算机实验室实验时间：年月日 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系统自动触发，如 果改变，则需单击窗体才能显示结果。

VB实验报告(含答案)

VB实验报告(含答案)

实验报告 课程名称_程序设计基础Visual Basic_ 班级______ _____＿姓名_____ ____

实验一 VB环境和创建一个简单的VB程序 一．实验目的： 1.了解VB系统对计算机软件、硬件的要求。 2.掌握启动和退出VB的方法。 3.了解和使用VB集成开发环境各窗口、菜单的一般 功能。 4.熟悉建立、编辑、运行、保存一个简单的VB应用 程序的全过程。 5.了解文本框、标签框、命令按钮的构造及其属性、 事件和方法。 二．实验内容： 1．设计一个简单的应用程序，要求在窗体上画一个文本框、一个标签和两个命令按钮编一程序，并把命令按钮分别设置为”显示”和”清除”。程序运行后，单击”显示”按钮，在文本框中输出一行信息；单击”清除”按钮，则清除文本框中的内容，运行界面如图1.1所示。

实验二简单程序设计数据类型及常用内部函数的简单应用 一．实验目的： 1．掌握Visual Basic数据类型的基本概念。 2．掌握用Visual Basic的各种运算符及表达式。 3．学习使用Visual Basic内部函数和数据输入、输出方法。 4．掌握命令按钮、文本框和标签。 5．设计顺序程序。 二．实验内容： 1．编写一个华氏温度和摄氏温度之间的转换程序，如图2-2所示,要求用inputbox函数输入华氏 温度，用msgbox输出转换后的摄氏温度。转换 公式是：C= 5 / 9(F - 32)。F为华氏温度，C 为摄氏温度。 2.用三种除法运算（/ 、\、Mod）做计算。 要求:在窗体上画五个标签、五个文本框和一个命令按钮，如图2-2所示。程序运行后，在第一个文本框中输入被除数，在第二个文本框中输入除数，然后单击命令按钮，即可得到三种不同的相除结果。

VB实验报告1

台州学院 《VB程序设计》实验报告 实验一：Visual Basic环境和程序设计初步 班级： 学号： 姓名： 实验日期：

一、实验目的和要求 1．了解VB系统对计算机软、硬件的要求； 2．熟悉VB的系统环境，了解VB程序的编写、保存和编译的方法过程； 3．初步熟悉几个常用控件的使用方法。 4．掌握启动与退出VB的方法。 二、实验主要仪器和设备 计算机一台，Windows XP操作系统，Visual Basic环境。 三、实验内容 实验1.1设计一个程序，程序运行的初始界面如图1-1所示。当单击“显示”按钮时，在文本框中显示“欢迎使用VB！”（图1-1）；当单击“清除”按钮时，清除文本框内的文本；当单击“退出”按钮时，结束程序运行。 图1-1 程序运行初始界面 图1-2 单击“显示”按钮后的程序界面 实验1.2 设计一个程序，程序运行的初始界面如图1-3所示，其中“显示”按钮为不可用。同时要求： （1）当单击“改变文字”按钮时，在左边标签文字内容改为“你好，张三！”，同时“改变文字”按钮变为不可用（图1-4）； （2）当单击“隐藏”按钮时，将左边标签设为不可见，同时“隐藏”按钮变为不可用，“显示”按钮变为可用（图1-5）； （3）当单击“显示”按钮时，重新显示左边标签，同时“隐藏”按钮变为可用，“显示”

按钮变为不可用（图1-4）。 图1-3 第1题的程序运行初始界面 图1-4 单击“改变文字”按钮后的程序界面 图1-5 单击“隐藏”按钮后的程序界面 四、实验原始记录 实验1.1 程序的界面设计。（可以是多张主要的图。下面的图要替换成你们自己设计的图。如何取图？设计好界面，按“Print Screen SysRq”键，打开画图软件，单击“编辑|粘贴”命令，利用菜单栏下方的“选定”功能，选中窗体，按“Ctrl + C”键，然后选中下面的实验样例图，按“Ctrl + V”键，替换掉）

VB实验报告模板

课程编号：B080103140 https://www.wendangku.net/doc/4e15369940.html,程序设计 实验报告 东北大学软件学院

1.实验目的 （1）练习https://www.wendangku.net/doc/4e15369940.html,的控件的综合运用。熟悉https://www.wendangku.net/doc/4e15369940.html,的集成开发环境，掌握https://www.wendangku.net/doc/4e15369940.html, 编程技巧和开发过程。 （2）训练学生对https://www.wendangku.net/doc/4e15369940.html,的基本语句、控件、文件等的综合运用。 2.实验内容 （1）https://www.wendangku.net/doc/4e15369940.html,控件综合应用。 （2）https://www.wendangku.net/doc/4e15369940.html,文件操作——具体的名称（需要替换并变为黑色）。 3.程序中使用的控件及其命名 把程序中用到的控件类型及对应的名称以表格的形式给出，表格的行数可以根据需要进行扩充。 正文字体为“宋体五号”，并且为黑色，首行缩进2个汉字，如包含英文，用“Times New Roman”，行间距为“多倍行距”，设置为1.25（从弹出菜单的“段落”菜单项进行设置，或利用“格式刷”直接从本说明刷取格式）。 注意说明文字需要删除，不能保留在文档中。 （1）实验1的控件及命名 （2）实验2的控件及命名 4.系统实现与调试 把主要实现的功能用语言进行描述，并给出调试时的截图（主要是功能验证的截图，在结算时，是否能正确的找零等） 如果包含图片，图片要居中，而且图片的高度不能超过页面高度的1/3。 （1）实验1的系统实现与调试 正文字体为“宋体五号”，并且为黑色，首行缩进2个汉字，如包含英文，用“Times New Roman”，行间距为“多倍行距”，设置为1.25（从弹出菜单的“段落”菜单项进行设置，或利用“格式刷”直接从本说明刷取格式）。 注意说明文字需要删除，不能保留在文档中。

（2）实验2的系统实现与调试 正文字体为“宋体五号”，并且为黑色，首行缩进2个汉字，如包含英文，用“Times New Roman”，行间距为“多倍行距”，设置为1.25（从弹出菜单的“段落”菜单项进行设置，或利用“格式刷”直接从本说明刷取格式）。注意说明文字需要删除，不能保留在文档中。 5.创新点及存在问题 列举出主要的创新点和存在的问题。正文字体为“宋体五号”，并且为黑色，首行缩进2个汉字，如包含英文，用“Times New Roman”，行间距为“多倍行距”，设置为1.25（从弹出菜单的“段落”菜单项进行设置，或利用“格式刷”直接从本说明刷取格式）。注意说明文字需要删除，不能保留在文档中。 6.实验总结 正文字体为“宋体五号”，并且为黑色，首行缩进2个汉字，如包含英文，用“Times New Roman”，行间距为“多倍行距”，设置为1.25（从弹出菜单的“段落”菜单项进行设置，或利用“格式刷”直接从本说明刷取格式）。注意说明文字需要删除，不能保留在文档中。

VB实验报告答案

福建农林大学计算机与信息学院(计算机公共基础二级课程) 实验报告 课程名称：Visual Basic 程序设计 姓名：邹丽平 学院: 食品科学学院 专业：食品科学与工程 年级：2010级 学号：102258016001 指导老师：黄红兵 职称：讲师 2012 年5 月20 日

实验项目列表

福建农林大学计算机与信息学院实验报告 学院：食品科学学院专业：食品科学与工程年级： 2010级 姓名：邹丽平学号： 102258016001 实验室号__宝玲楼304___计算机号 01 实验时间： 2012.3.5 指导教师签字：黄红兵成绩： 报告退发（订正、重做） 实验一 VB环境和简单应用程序设计 一、实验目的和要求 1.了解Visual Basic系统对计算机软件、硬件的要求。 2.掌握启动与退出Visual Basic的方法。 3.熟悉visual basic的集成开发环境（IDE）。 4.掌握建立、编辑、运行和保存一个简单visual basic应用程序的全过程。 5.了解基本控件（窗体、标签、文本框、命令按钮）的简单应用。 二、实验内容 1.启动Visual Basic 6.0，熟悉其集成开发环境。 2.按图1-1在标题为“第一个应用程序”的窗体Form1上画两个标题分别为“欢迎您使用Visual Basic”和“请输入您的姓名”的标签（ Label1和Label2），Label1的字体为隶书，并且其能根据文本大小自动调整尺寸，Label2的字型为倾斜；然后再设计一个初始文本为空的文本框Text1. 图1-1 运行界面 3.按图1-2在标题为“命令按钮设置”的窗体Form1上画三个标题分别为“禁止用C3”、“允许用C3”和“C3”的命令按钮（C1、C2和C3）。运行时，如果单击“禁止用C3”按钮，则C3按钮无效（如图10-2所示）；如果单击“允许用C3”按钮，则C3按钮有效。 图1-2 运行界面 4.按图1-3在标题为“文本复制”的窗体Form1上画两个文本框（Text1和

VB实验报告示例

《VB程序设计》实验报告 一、实验目的及要求（见实验书，要求手填）： 二、实验完成情况： 实验完成情况表： 三、界面设计与程序代码 要求：给出界面设计示意图，在属性窗口修改过的对象属性需列出，列出方式如下： 1、 步骤： ①界面设计 ②程序代码 Public Class Form1

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Text = "装入窗体" Me.BackgroundImage = Image.FromFile("tongji.bmp") '当前目录为Bin的Debug End Sub Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Click Me.Text = "单击窗体" Me.BackgroundImage = Image.FromFile("tongji-2.bmp") End Sub Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.DoubleClick Me.Text = "双击窗体" Me.MaximizeBox = False Me.MinimizeBox = False Me.BackgroundImage = Nothing End Sub

《VB过程实验报告》

《VB程序设计》实验单元一 实验报告 专业班级：经济学类1202 班姓名刘金学号201218910204 指导教师：王云侠完成时间：2013.6.02 一：实验题目 过程 二：实验环境 Windows win7系统；VB 6.0 三：实验目的 1.掌握自定义函数过程和子过程的定义和调用方法。 2.掌握形参和值参之间的对应关系。 3.掌握值传递和地址传递的传递方式。 4.掌握变量，函数和过程的作用方法。 5.掌握递归的概念和使用方法。 6.熟悉程序设计中的常用算法。 四：实验内容 1.编一子过程Proc Min（a(),amin），求一维数组a中的最小值amin。 4编写一个函数过程，Is H(n)，对于已知正整数n，判断该数是否是回文数，函数的返回值类型为布尔型。主调程序每输入一个数，调用Is H函数过程，然后在列表框中显示输入的数，对于是回文数显示一个“★”。 五：实验步骤 第1题： （1）打开VB6.0 (2) 建立新工程任务form1 (3) 双击工程窗界面，输入以下代码： Private Sub Form_Click() Dim a(1 To 10), amin, i% For i = 1 To 10 a(i) = -Int(R n d * 101 + 300)

Print a(i); Next i Call s(a(), amin) Print Print "min="; amin End Sub Sub s(b(), min) Dim i% min = b(L Bound(b)) For i = L Bound(b) + 1 To U Bound(b) If b(i) < min Then min = b(i) Next i End Sub （4）单击运行即可 第4题 （1）打开ＶＢ新工程，双击页面直接创建选择以下窗口字字 （2）操作过程 分别建立command 1 , text1 , label 1, 和picture box 1 并相应输入：“数据显示”，清除text 1,“数据输入”字样。清除picture box 1 (3)双击工程窗界面，输入以下代码： Option Explicit Private Sub Command1_Click() Print Is H(Val(Text1.Text)) End Sub Function Is H(n) As String Dim i As Integer For i = 1 To Int(Len(n) / 2) If Mid(n, i, 1) <> Mid(n, Len(n) - i + 1, 1) Then Picture1.Print Text1.Text Exit Function End If Next i Picture1.Print Text1.Text; "★" End Function （4）单击运行，并在text1 窗口中分别输入121,1212221,12345,123454321,23567..... （5）单击数据显示（command 1) 运行如下：

大一《VB面向对象程序设计》作业及实验报告书_答案

实验一 一 DDBAB,CC(D)DDC,ADDCA 二 windows 中断 工具箱 代码 分类 form2.show 有语法错误 错误 事件 结构化 文件名和结构 工程 代码 双击任意控件或右健快捷菜单选“代码窗口”vb的安装文件夹 属性 方法 font load 对象 实验二 一 BCBCC,CBBDA,CCCBA,CBDCC 二 form_click() interval,5000 vbp,frm top,left,height,width,像素 picture load locked font,alignment gotfocus,lostfocus 属性窗口，代码 实验三 一

A(BC)(BC)AA,A(BCD)DBB,B 二 3，4，5，6，8，10，11，12，14，15，16三 abs(x+y) (3+x*y)^2 (-b+sqr(b^2-4*a*c)/(2*a) sin(30*3.14/180)+exp(2) 四 int(rnd*71+20) x*y<0 x mod 3=0 or xmod 7=0 x>=10 and x<20 x>="A" and x<="Z" left(s,3) 或者,mid(s,1,3) 实验四 一 CDCDA,DBBAC 二 (1) 48.71E-01,-4.8712 (2) 关系，逻辑，数值 (3) 900，100，mid(a,2,1),c (4) m 1,2,3 print m & "月是第二季度" end select 三 (1) x=4 y=13 (2) 10 实验五 一 BCBAC 二 （1）for x=2 to 10 s*(1-1/x) (2) t<1E-6 (3) j

vb实验报告心得体会

vb实验报告心得体会 vb实验报告心得体会 vb实验报告心得体会数据库课程设计大赛的尘嚣渐渐远去，怀着对这次大赛的些许不舍，怀着对当初课程设计开始时候的豪情万丈的决心的留恋，怀着通过这次课程设计积累的信心与斗志，我开始写这篇文章，为自己的足迹留下哪怕是微不足道但是对自己弥足珍贵的痕迹并期望与大家共勉。 首先，让我的记忆追溯到大二暑假，在老大的指引下，我接触到Mirosoft 公司的.NET产品。那个时候我已经学过v和asp，因为indos程序设计实验的课的关系，接触过vb，但是没有专门去学他，因为习惯了++里面的lass，int，觉得vb的sub，var 看着就不是很顺心。我是一个好奇心很强的人，突然看到了一个号称“.net是用于创建下一代应用程序的理想而又现实的开发工具”，而且主推#语言，由于对语言的一贯好感，我几乎是立刻对他产生了兴趣。我就开始了对#的学习，任何语言都不是孤立存在的，所以数据交互是很重要的，暑假的时候我把我们这学期的课本数据库系统概论看了一遍。我记得以前用语言编程的时候，数据是在内存中申请空间，譬如使用数组等等。很耗费内存空间。这个时候就是数据库站出来的时候啦，于是我又装上了sql server2000，以前学asp的时候用的是aess，那个时候只是照着人家做，理论是什么也不是很清楚。 通过一个暑假的学习，基本搞清楚了理论方面的东西，具体怎么用也不是很清楚。但是这为这学期的课程设计打下了铺垫。

来到学校后，随着这学期的数据库课程大赛开始了，我有一个看法就是我自己应该具备的能力不是我会多少，而是我应该具备快速学会东西的能力。遇到什么就学什么。我们有时候很容易被一些专业名词说吓着，包括什么建模，软件工程，数据分析，数据挖掘等等。我身边就有很多同学被这些纸老虎所唬住，而没有勇气去接触他们，总是说这个太难了之类的退堂鼓的话，他们低估了自己的潜力同时也压抑住了他们自己的好奇心。其实都是纸老虎，又不是什么国家科研难题，只是去用一些工具，发明工具是很难，但是用一个工具就容易多了，just do it!我记得我做这个数据库之前，我们老师说要做好前期分析，我就在网上搜索用什么分析工具好。最后我选择了roseUML建模工具。在此之前，我脑袋里面没有软件建模的思想，什么UML建模对我而言就是一张空白的纸。但是真正接触后并没有想象的那么难，有什么不懂的上网去搜索，这是一个信息横流的世界，有google，baidu就没有不能解决的知识难题。以及后来的数据库分析的时候用到的poerdesigner也是一样。 开发的时候我想过用什么架构，s模式?模式有很多，怎么选择?我就上网搜索现在最流行的架构是什么。结果搜到了MVC架构，就是你啦。我决定用这个架构，不会，没关系，咱学。Just do it!前期工作准备好后，那么我就得把我暑假学的.net加以实践。这个时候我更加深入的了解了利用https://www.wendangku.net/doc/4e15369940.html,操纵数据库的知识。并且对数据库里面的存储过程有了比较深入的了解。经过大概2个多星期的奋斗，我完成了我的数据库课程设计--基于.net数据集的图书馆管理系统。并最后非常荣幸的获得了大赛的一等奖以及以及新技术应用奖。

VB设计计算器实验报告

VB 设计计算器 实验报告 姓名: 专业: 学号: 二0 一一年十一月七日

设计功能完整的计算器，实现如下图所示按钮（除“ MC，“MR , “MS，“M+ ）及菜单功能，如图： 一、解题思路、分析： 对于我来说，设置一个完整的计算器是一个艰巨的任务，一开始想了一小段时间，自己试着编了一些，但就是无法达到一个完整的计算器，于是，就到网上去下载了一些有关计算 器的程序进行参考分析。首先先定义一些量，比如说前后两个操作数opl、op2，小数点是 否真存在的量DecimalFlag ，操作数个数NumOps上一次按键的类型等。接着对窗体进行初始化，同时设置所有变量为其初始。然后对各个键盘的命令进行编写程序，对0---9按键设 置为一个按键命令组，编写一个程序，同时加减乘除设置一个命令组，也编写一个程序，其 他按键都各自设置为一个命令，分别单独进行编写程序。同时在多个命令中都要对显示器中 的小数点进行分析，看它是否是真实存在。同时对于除法分母是否为0，也要加以考虑。 、源程序: Private Sub Form_Load() DecimalFlag = False NumOps = 0 LastI nput = "NONE" OpFlag ="" Text1.Text = Format(0, "0.") 'Decimal.Captio n = Format(0, ".") End Sub Opti on Explicit Dim Op1, Op2 Dim DecimalFlag As In teger Dim NumOps As In teger Dim LastInput 类型 Dim OpFlag Dim TempReadout ' 窗体的初始化过程 ' 设置所有变量为其初始值 前面输入的操作数 小数点仍然存在吗？ 操作数个数 指示上一次按键事件的 指示未完成的操作

郑州大学VB实验报告书 参考 答案

郑州大学VB实验报告书参考答案。。 以下内容均来自百度文库，所以仅供参考。。 不过经亲自测试习题及实验（一）的答案基本正确，除了实验题的3，4小题没有改字形字体颜色什么的。。 实验一 一、选择题 DDBAB,C(CD)DDC,ADDCA 二、填空题 Windows 中断 工具箱 代码 分类 form2.show 有语法错误 错误 事件 结构化 文件名和结构 工程 编写代码 双击任意控件或右健快捷菜单选“代码窗口” vb的安装文件夹 属性 方法 font load 对象 三、编程

1-1 Private Sub Command1_Click() Print Sqr(8), 8 ^ (1 / 3) End Sub 1-2 Private Sub Command2_Click() For i = 100 To 110 Print Sqr(i) Next i End Sub 1-3（基本设置在属性窗口完成！）Private Sub Command3_Click() Print "郑州大学在前进!" End Sub 1-4（基本设置在属性窗口完成！）Private Sub Command4_Click() Label1 = "蓝天、白云、绿水、青山" End Sub 实验二 一

BCBCC,CBBDA,CCCBA,CBDCC 二 form_click() interval,5000 vbp,frm top,left,height,width,像素picture load locked font,alignment gotfocus,lostfocus 属性窗口，代码 三 2-1 Private Sub Command1_Click() Label3 = Text1 * Text2 End Sub Private Sub Command2_Click() Label3 = Text1 / Text2 End Sub 2-2 Private Sub Command1_Click() Picture1.Visible = True