vb实用教程实验指导书Word格式文档下载.docx
《vb实用教程实验指导书Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《vb实用教程实验指导书Word格式文档下载.docx（31页珍藏版）》请在冰豆网上搜索。
（3）属性设置。
为了明确应用程序的功能，一般需要修改控件的标题属性。
首先，从屏幕右边的属性窗口中打开Form1的属性列表，找到Caption属性栏，把其值由“Form1”改为“计算圆面积”（如图14-1-2），按回车键确认。
这时，窗体标题也随之改变了。
然后，从属性窗口中打开命令按钮Command1的属性列表，找到Caption属性栏，把其值由“Command1”改为“开始”。
用同样方法，把命令按钮Command2的Caption值改为“结束”。
至此，用户界面设计完成。
（如图14-1-3所示）。
图14-1-2图14-1-3
（4）编写程序代码。
计算圆面积的计算公式是S=R2，其中，表示圆周率（这里取值为3.14），R为半径，S为圆面积。
根据计算公式，编写的程序如下。
PrivateSubCommand1_Click（）
Dims,r
r=InputBox（"
请输入圆半径：
"
）
s=3.14*r*r
Print
Print"
半径为"
;
r;
"
面积为"
s
EndSub
PrivateSubCommand2_Click（）
End
（5）修改程序代码。
在VB中，输入和修改程序代码必须要进行代码编辑环境，进入代码编辑环境有4种方法：
双击控件；
◆使用鼠标右键单击控件，从弹出的菜单中选择“查看代码”命令执行；
◆从菜单栏的“视图”菜单中选择“代码窗口”命令执行；
◆在工程资源管理器窗口单击“查看代码”图标。
无论使用哪一种方法进入代码编辑环境，都会显示代码编辑窗口（如图14-1-4）。
代码编辑窗口中的顶端有两个下拉框，左边是对象列表框，右边是事件列表框。
从对象列表框中选择控件名和从事件列表框中选择相应的事件名后，代码编辑窗口中显示出相应的事件驱动程序的窗口。
这时就可以在事件驱动程序的窗口中输入程序代码。
如果双击控件，代码编辑窗口会出现默认的Click事件窗口，对于这个例子，双击命令按钮Command1，代码编辑窗口中显示出Command1_Click事件窗口。
可以在这个窗口中输入程序代码。
用同样的方法，也可以输入Command2的事件驱动程序代码。
（6）运行程序。
运行VB程序有3种方法：
◆单击工具栏上的“启动”按钮；
◆按F5功能键；
◆从菜单栏的“运行”菜单中选择“启动”命令，这时系统对程序解释执行。
若从菜单栏的“运行”菜单中选择“全编译执行”命令，程序编译执行。
程序运行后，屏幕出现用户界面，单击“开始”按钮，执行Command1_Click事件驱动程序。
执行到“r=InputBox（"
）”时，屏幕出现如图14-1-5所示的对话框。
输入数据（如：
3）后单击“确定”按钮，程序继续执行，输出结果如图14-1-6所示。
单击“结束”按钮，结束程序的执行。
图14-1-5图14-1-6
如果程序出现编译或运行错误，系统都将给出错误提示信息。
此时，应分析产生错误的原因，找出出错的位置，并使用编辑功能键对程序进行修改。
修改完程序后，按F5功能键，重新执行程序。
（7）保存程序。
保存程序有两种方法：
◆选择菜单栏上“文件”菜单中的“保存工程”命令执行；
◆单击工具栏中的“保存”按钮。
不管采用哪一种保存程序的方法，对于新程序，系统都会要求用户给定存放的路径和文件名，并分别保存窗体文件和工程文件。
（8）退出VB6.0。
退出的方法有三种：
◆单击主窗口右上角的“关闭”按钮；
◆选择菜单栏上的“文件”菜单中的“退出”命令执行；
◆按Alt+Q组合键。
2.使用VisualBasic6.0的联机帮助
（1）使用“MSDNLibrary在线帮助”。
在运行VB6.0时，使用“MSDNLibrary在线帮助”是寻求帮助的常用方法。
操作步骤为：
◆启动VB6.0，选择菜单栏上“帮助”菜单的“内容”命令，系统打开“MSDNLibraryVisualStudio6.0”对话框。
◆在“活动子集”的下拉框中选择“*VisualBasic文挡”，然后单击“目录”选项。
单击“MSDNLibraryVisualStudio6.0”目录前面的“+”号，展开“MSDNLibraryVisualStudio6.0”目录。
◆单击“VisualBasic文档”目录前面的“+”号，展开“使用ViisualBasic”目录。
◆单击“程序员指南”目录前面的“+”号，展开“程序员指南”。
因为MSDN内容太多，占用硬盘空间，很多机房不装MSDN，所以，上机时可能看不到。
启用帮助时，系统弹出一对话框，如图14-1-7
（2）使用“上下文相关帮助”。
使用“上下文相关帮助”，可以不必使用“帮助”菜单就能获得“工具箱”中的控件、“属性”窗口中的属性、应用程序中的关键字等内容的帮助。
操作方法是把光标移到（或选取）希望获得帮助的位置，然后按F1功能键，VB会自动弹出相关主题的帮助。
获得“工具箱”中控件帮助的操作步骤为：
◆把光标移到“工具箱”中需要获得帮助的控件处，并单击；
◆按F1功能键。
获得“属性”窗口中属性帮助的操作步骤为：
◆把光标移到“属性”窗口中需要获得帮助的属性处，并单击之；
获得应用程序中关键字帮助的操作步骤为：
◆把光标移到应用程序中需要获得帮助的关键字处；
（3）“帮助”主题中代码示例的运行。
VB6.0帮助系统有很多帮助主题，在这些主题中包括一些可以直接运行的程序代码示例。
我们可以通过Windows的剪贴板将这些程序代码复制到VB的代码窗口中，然后单击工具栏上的“启动”按钮运行这些程序代码。
例如，在VB集成开发环境把光标移到属性窗口的FillColor属性处，并单击之，然后按F1功能键。
在出现的窗口中单击“示例”，用鼠标（或键盘）选取“示例”中的程序代码。
选择菜单栏上“编辑”菜单的“复制”命令（或用Ctrl+V）把代码复制到Windows的剪贴板上，然后打开VB的代码编辑窗口，单击工具栏上的“粘贴”按钮（或用Ctrl+V）把选择的程序代码复制到代码窗口，这时就可以运行程序了。
如果代码示例涉及除窗体以外的控件，则在进入VB集成开发环境之后应先进行用户界面设计，即在窗体添加相关控件后，才能正确运行程序。
三、实验小结
实验2VisualBasic语言基础
1.掌握VisualBasic6.0数据类型的概念。
2.掌握常量的概念、定义方法和作用域。
3.掌握变量的概念和定义方法，熟悉可变类型变量和静态变量的使用，掌握自动变量与静态变量的区别。
4.掌握各种运算符的功能、表达式的构成、表达式中运算符的运算顺序和如何求表达式的值。
5.掌握常用标准函数的一般形式、功能和用法。
6.进一步熟悉VisualBasic6.0集成开发环境。
1.利用下列式子测试各种运算符的功能
1）20\4.5
2）55mod2
3）6^3
4）3^（-1/2）
5）“How”&
“areyou”
6）not3>
2
7）3<
5and6>
3
8）trueandfalse
9）7>
4or3<
1
10）9<
10ortrue
【要求】先手工求出题中各式的值，然后在立即窗口中计算和输出题中各式的值。
在立即窗口中计算和输出题中各式的值的操作步骤为：
1）
启动VB6.0，进入集成开发环境，屏幕显示“新建工程”对话框。
2）单击“打开”按钮，进入设计模式，选择菜单栏上“视图”菜单中的“立即窗口”命令执行。
3）在立即窗口中使用print方法计算和输出题中各式的值，如图14-2-1所示。
（print可以用？
代替）
图14-2-1
2.利用下列函数测试常用标准函数的功能
1）int（-354.5324）
2）fix（354.5324）
3）val（“34.56”）
4）abs（-123）
5）sgn（-200）
6）sqr（sqr（81））
7）left（“howareyou”,3）
8）mid（“howareyou”,8,5）
9）instr（1,“howareyou”,“are”）
10）string（5,“@”）
11）int（（200*Rnd）+1）
【要求】先手工求出题中各函数的值，然后在立即窗口中使用print方法进行验证。
3.利用下列表达式测试表达式中运算符的运算顺序和求表达式的值
1）（5+4）\2
2）21\4*2.0^2/1.3
3）27\3mod3.2*int（2.5）
4）“abc”+”234”
5）“xyz”&
“123”&
”xyz”
6）123.25+”0.75”=124
7）“china”>
=”canada”
8）“xyz”<
=”xyz”&
”123”
9）5*4>
4and5=5
10）falseornot7-3<
=4
【要求】先手工求出题中表达式的值，然后在立即窗口中验证。
4.上机实验常量和变量的定义方法以及常量的作用域
【参考步骤】
1）单击菜单栏上的“文件”菜单中的“新建工程”命令，系统显示一个“新建工程”对话框，单击“确定”按钮，系统进入设计模式，系统提供一个名为Form1的窗体。
2）界面设计。
仿照实验一介绍的方法在这个窗体上设置两个命令按钮Command1和Command2。
3）
属性设置。
设置窗体和命令按钮的Caption：
将窗体的Caption属性设置为“计算圆的周长和面积”，将Command1的Caption属性设置为“计算圆周长”，将Command2的Caption属性设置为“计算圆面积”。
用户界面如图14-2-2所示。
4）输入程序代码。
OptionExplicit
Constpi=3.14159
Dimr1!
r1=InputBox（"
请输入半径"
半径="
;
r1;
周长="
2*pi*r1
设置要求变量声明语句。
在“工具”菜单中选择“选项”，然后选择“编辑器”选项卡，并单击“要求变量说明”。
此后，所有新建模块自动加入“optionexplicit”语句。
打开代码编辑窗口，输入语句“constpi=3.14159”。
从对象列表框选择命令按钮Command1，从事件列表框选择Click事件。
此时，出现事件驱动程序窗口，这时可以在事件驱动程序窗口中输入代码。
以相同的方法输入Command2_Click的事件驱动程序。
Dimr2!
r2=InputBox（"
r2;
面积="
pi*r2*r2
5）运行程序。
【思考】若删除窗体文件事件驱动程序前面的语句“Constpi=3.14159”，而把该语句放在其中一个事件驱动程序内部的Dim语句的前面。
再次运行程序看看出现什么情况，并分析为什么会出现这种情况，从而理解常量作用域的概念。
5.上机实验自动变量与静态变量的区别
1）建立新工程，如上题。
在窗体上设计两个命令按钮Command1和Command2。
3）属性设置：
◆把窗体Form1的caption属性的值设置为“自动变量与静态变量的区别”。
◆把命令按钮Command1的caption属性的值设置为“自动变量”。
◆把命令按钮Command2的caption属性的值设置为“静态变量”。
DimxAsInteger
x=x+1
Printx;
StaticyAsInteger
Ify=0ThenPrint
y=y+1
Printy;
5）运行程序后，单击5次标题为“自动变量”的按钮，再单击5次标题为“静态变量”的按钮，观察窗体输出结果。
6）写出并分析输出结果，找出自动变量与静态变量的区别。
实验3顺序结构程序设计
1.掌握顺序结构程序的概念。
2.掌握赋值语句的一般格式、功能和使用。
3.掌握使用InputBox函数、MsgBox函数、文本框和标签输入输出数据的方法。
4.掌握Print方法、Tab函数、Spc函数和Format函数的一般形式、功能和使用。
5.掌握在属性窗口中设置属性值的方法。
6.掌握打开旧文件和编辑修改程序的方法。
1.利用下列程序测试Print方法和Tab函数及Spc函数的功能
PrivateSubForm_Click（）
Dimx
X=256.577
x="
Printx
PrintTab（15）;
-500;
Tab（25）;
652;
Tab（35）;
-955
PrintSpc（15）;
Spc（25）;
Spc（35）;
【操作提示】在“代码窗口”的“对象”列表框选择窗体对象“Form”，在“代码窗口”的“事件”列表框中选择“Click”，然后在“Form_Click”事件驱动程序框架中填写其他程序代码。
【要求】先阅读程序并写出运行结果，然后再通过计算机运行程序得出运行结果，并指出tab函数和spc函数的区别。
2.利用下列程序测试Format函数的功能
Dimx!
x=36.67
PrintFormat（x,"
###.##"
##.##"
000.00"
00.0"
0.00%"
$##.##"
+##.##"
00.00E+00"
【要求】先阅读程序并写出运行结果，然后再通过计算机运行程序得出运行结果，并指出每一个Format函数所实现的功能。
3.设计一程序：
使用InputBox函数输入某品牌电脑的单价和购买的数量，计算并输出需付款金额
【操作提示】定义两个变量用来接受“单价”和“数量”。
【要求】描述界面的设计，指出控件属性的设置，编写出程序代码，正确运行程序。
【思考】如果通过文本框输入某品牌电脑的单价和购买的数量，程序又该如何实现。
4.Rnd函数产生一个（0，1）间的单精度随机数，用此函数产生一个两位随机整数后，反向输出
5.利用下列程序测试MsgBox函数的功能
Dimmsg,style,title,response,mystring
Msg="
要继续吗？
Style=vbYesno+vbcritical
Title="
提示信息"
Response=MsgBox（msg,style,title）
Printresponse
Ifresponse=vbyesthen
Mystring=”yes”
Else
Mystring="
no"
Endif
PrintMystring
【要求】
（1）先阅读程序，再运行程序，分析运行过程，掌握MsgBox函数的使用方法。
（2）修改MsgBox函数中的参数，然后再运行程序，观察修改后程序运行时的变化。
实验4选择结构程序设计
1.掌握选择结构程序的概念。
2.掌握单行结构条件语句的一般格式、功能和使用。
3.掌握块结构条件语句的一般格式、功能和使用。
4.掌握情况语句的一般格式、功能和使用。
1.输入一个字符，判断该字符是字母字符、数字字符还是其他字符，并作相应显示。
【操作提示】可以通过该字符的ASCII码来判断字符的类型。
2.对一批货物征收税金，按货物的价格X征收不同的税金Y，根据如下公式编写一程序读入其价格，计算并输出税金。
5%XX>
=10000
Y=
3%X5000<
=X<
10000
2%X1000<
5000
0X<
1000
3.输入两个数值和一个运算符（+－*/），输出运算结果。
【操作提示】可定义三个变量分别用来存放两个数值和一个运算符，通过判断运算符的类型从而实现运算。
【思考】在执行程序时，若输入的运算符不是题目中指定的运算符，则要重新输入，程序又应该如何实现？
实验5循环结构程序设计
1.掌握循环结构程序的概念。
2.掌握While…Wend语句的一般格式、功能和使用。
3.掌握Do…Loop语句的一般格式、功能和使用。
4.掌握For…Next语句的一般格式、功能和使用。
5.掌握多重循环的概念、执行过程和使用。
1.计算1×
2×
3×
……×
m的值，其中m的值由用户输入。
【算法提示】
◆设置计数变量n和累积变量t，它们的初值都置为1。
◆设计一个循环过程。
在循环体中，用赋值语句“t=t*n”将n的值累乘，赋值语句“n=n+1”使n每循环一次都增加1。
◆当n的值大于m时，循环结束。
◆输出t的值。
【要求】描述界面的设计，指出控件属性的设置，根据算法提示编写出程序代码，正确运行程序。
【思考】
◆若m的值很大，对程序有什么影响，应该怎样处理？
◆若公式改为1+2+3+……+m，程序又应该如何修改？
2.使用公式e=1+1/1!
+1/2!
+1/3!
+…求e的近似值，要求计算到最后一项小于10-8为止。
◆设置计数变量n，累积变量t，累和变量e，它们的初值都置为1。
在循环体中，用赋值语句“t=t*n”将n的值累乘，赋值语句“e=e+1/t”使1/t的值累加，赋值语句“n=n+1”使n每循环一次都增加1。
◆当1/t的值小于10-8时，循环结束。
◆循环结束后，输出e的值。
【要求】描述界面的设计，指出控件属性的设置，根据算法提示编写出程序代码（使用DoWhile…Loop语句和Dountil…Loop语句两种方法分别实现），正确运行程序。
【思考】比较DoWhile…Loop语句和Dountil…Loop语句的区别。
3.在100~200之间的数中找出同时满足除3余2、除5余3和除7余2的所有整数。
◆设置一个循环，使控制变量n的值从100~200变化。
◆使用VB语言正确表示n所要满足的条件“除3余2、除5余3和除7余2”，若n满足了这个条件则输出n的值。
实验6数组
1.掌握一维数组、二维数组的概念。
2.熟悉一维数组、二维数组的说明方法。
3.掌握数组元素的引用、赋值。
4.掌握一维数组、二维数组的输入、输出方法。
5.初步掌握使用单重或二重循环结构控制数组元素的下标，按一定规律变化来处理一维数组元素和二维数组元素的程序设计方法。
6.初步掌握可调数组和控件数组的使用。
1.使用随机函数产生10个1～100之间的随机整数存放在一维数组a中，并把该数组元素显示在一个文本框里。
然后在数组a中的指定位置插入一个指定值，并将插入值之后的数组a的所有元素显示在另一文本框中。
【参考界面】如图14-6-1所示。
【算法分析】假设数组a的下界为1，指定插入的数组元素值为num、插入位置为p，则按题意要把数组a中的元素从a（p）起到最后一个元素都向后移动一个位置，而原a
（1）,a
（2）,…a（p-1）的位置不变，num作为a（p）的值。
把数组a中的元素从a（p）起到最后一个元素都向后移动一个位置，需要从最后元素开始逐个往前移动一个位置。
要
升级会员 