VB程序设计上机指导.docx
- 文档编号:3635541
- 上传时间:2022-11-24
- 格式:DOCX
- 页数:28
- 大小:742.31KB
VB程序设计上机指导.docx
《VB程序设计上机指导.docx》由会员分享,可在线阅读,更多相关《VB程序设计上机指导.docx(28页珍藏版)》请在冰豆网上搜索。
VB程序设计上机指导
VB程序设计上机指导
实验一窗体文件、工程文件的建立、保存与打开
(一)(2学时)一、上机目的
1、掌握工程文件的建立、保存和打开方法。
2、掌握窗体文件的建立、保存和打开方法。
3、掌握建立、编辑和运行一个简单的VisualBasic应用程序的全过程。
二、上机内容及主要步骤
上机题1:
设计一简单应用程序,在窗体上放置1个文本框、2个命令按钮,初始的时候text控件值为空,单击“继续”按钮后text控件显示“这是我的第一个VB应用程序”,单击“结束”按钮退出,用户界面如图所示。
图1
主要步骤提示:
(1)新建一个工程;
(2)按上图所示在窗体上添加一个标签(label)控件,两个命令按钮(command)控件,并相应调整它们在窗体中的位置;
(3)将标签控件的text属性设置为空(即清除text属性中的文本text1);
(4)双击“结束”按钮,在弹出的代码窗口中编写相应的事件过程,如图2;
(5)同理,双击“继续”按钮,在弹出的代码窗口中编写相应的事件过程,如图3;
(6)保存并运行工程,如运行时有错误请根据提示做相应修改后再保存再运行。
图2
图3
上机题2:
设计如图4的密码验证程序,假设正确密码是“123456”,单击“验证”按钮时,如果输入的密码正确则在标签2上提示“密码正确!
”,否则则在标签2上提示“密码错误!
”,单击“退出”按钮退出程序。
主要步骤提示:
(1)建立如图4所示的应用程序界面(包括两个标签,标签1用于显示“请输入密码”,标签2用于显示经过密码校验后的结果,标签2初始值为空;一个文本框,注意密码输入的时候要显示成*号的形式,可在password属性里设置;两个命令按钮)。
(2)“验证”按钮的事件过程如下:
PrivateSubCommand1_Click()
IfText1.Text="123456"Then
Label2.Caption="密码正确!
"
Else
Label2.Caption="密码错误!
"
Endif
EndSub
(3)保存并运行工程,结果如图5、图6所示。
图4
图5
图6
上机题3:
设计一个简单程序,该界面如下图所示。
程序运行后单击“开始”按钮,文本框中显示“欢迎使用VB6.0!
”,单击“修改”按钮时,将文本框中的文字的大小设为20号,前景色设成红色。
单击“清除”按钮时,清除文本框的内容,单击“结束”按钮时,程序结束。
图7
主要步骤提示:
(1)按上图所示建立好程序界面
(2)各按钮的主要事件过程如图8所示:
图8
三、注意事项:
(1)修改对象属性和引用对象方法时用的对象名必须是属性窗口中第一个属性“名称”属性里的值;
(2)对象名后的句点不能输成句号;
(3)输出一段文字时,在文字的两端必须加上英文输入状态下的双引号。
实验二窗体文件、工程文件的建立、保存与打开
(二)(2学时)
一、上机目的
1、熟练掌握工程文件的建立、保存和打开方法。
2、熟练掌握窗体文件的建立、保存和打开方法。
3、熟练掌握建立、编辑和运行一个简单的VisualBasic应用程序的全过程。
二、上机内容及主要步骤
上机题1:
设计一个程序,程序界面如图1:
程序由7个标签(label)、两个文本框(textbox)和三个按钮组成。
当用户输入完相应的姓名和学号信息后单击“确定”按钮会显示出校对信息(如图2);单击“清空”按钮后清空输入的信息及验证信息;单击“退出”按钮结束程序。
另外,在单击窗口的时候使窗口隐藏,并弹出一个对话框(如图3),该对话框提示“单击‘显示’,重新显示窗口”,当单击“显示”按钮后重新显示窗口。
图1
图2
图3
主要步骤提示:
(1)新建一个工程;
(2)建立如图1所示的应用程序界面(包括7个标签(label)、两个文本框(textbox)和三个按钮);
(3)编写各按钮的事件过程,其中“确定”、“清空”、“退出”、按钮的名字分别是command1、command2、command3。
相应的代码如图4;
(4)保存工程,运行并调试。
图4
上机题2:
设计一个程序,程序界面如图5所示:
程序由一个图像框(image)、四个按钮组成。
单击“左移”按钮,图像左移(每次向左移动100);单击“缩小”按钮图像,图像缩小为原来的一半;单击“放大”按钮,图像放大为原来的两倍;单击“右移”按钮,图像右移(每次向右移动100)。
图5
主要步骤提示:
(1)新建一个工程;
(2)建立如图5所示的应用程序界面(包括1个图像框(image)、和三个按钮),并事先往图像框中添加一张图片;
(3)编写各按钮的事件过程,其中“左移”、“缩小”、“放大”、“右移”按钮的名字分别是command1、command2、command3、command4。
相应的代码如图6;
(4)保存工程,运行并调试。
图6
三、注意事项:
(1)有关对话框的知识请参阅课本P176;
实验三常用标准控件(4学时)
一、上机目的
1、掌握标签、文本框、命令按钮的设计方法及常用属性、事件和方法;
2、掌握单选按钮、复选按钮和框架的设计方法及常用属性、事件和方法;
3、掌握列表框、组合框的设计方法及常用属性、事件和方法。
二、上机内容及主要步骤
上机题1:
设计一个程序,程序由两个按钮组成,每个按钮都有相应的快捷键,程序界面如图1。
当用户单击“确定”按钮或按键盘上的Enter键时窗体会显示信息“‘确定’按钮被选中!
”(如图2);当用户单击“取消”按钮或按键盘上的Esc键时窗体会显示信息“‘取消’按钮被选中!
”(如图3),
图1
图2
图3
主要步骤提示:
(1)新建一个工程;
(2)建立如图1所示的应用程序界面;
(3)将command1的Default属性设置为true,将command2的Cancel属性设置为true;
(4)编写两按钮的单击事件(利用窗体的Print方法输出提示信息);
(5)保存工程,运行并调试。
上机题2:
设计一个简单计算器,程序初始界面如图4所示:
当单击“相加”按钮,在前两个文本框的标签中显示“+”号,并计算出前两个文本框中两数的和,将和存放到第三个文本框;同样的道理单击其它按钮都会显示相应的运算符号,并算出结果;单击“归零”按钮,程序界面回到图4所示的界面(焦点在第一个文本框)。
图4
主要步骤提示:
(1)新建一个工程;
(2)建立如图4所示的应用程序界面(包括3个文本框、两个标签和五个按钮,为避免运算结果被误改,将文本框3设为只读);
(3)编写各按钮的事件过程,其中“相加”、“相减”、“相乘”、“相除”、“归零”按钮的名字分别是command1、command2、command3、command4、command5。
相应的代码如图5;
(4)保存工程,运行并调试。
图5
上机题3:
设计一个初始界面如图6的程序,文本框中默认显示“单选按钮演示”,单击“字体”框架中某一项时,文本框中的文字就被修改为相应的字体;单击颜色框架中某一项时,文本框中的文字就被修改为相应的颜色;单击“结束”按钮退出应用程序。
图6
主要步骤提示:
(1)新建一个工程;
(2)建立如图6所示的应用程序界面(包括1个文本框、两个框架frame和6个单选按钮OptionButton,1个命令按钮);
(3)编写各控件的事件过程,其中单选按钮“宋体”、“隶书”、“幼圆”、“红”、“绿”、“蓝”的名字分别是Option1、Option2、Option3、Option4、Option5、Option6。
相应的代码如图7;
(4)保存工程,运行并调试。
图7
上机题4:
设计一个初始界面如图8的程序,程序中文本框中默认显示“复选框演示”,选中“粗体”复选框时,文本框中的文字被加粗;选中“斜体”复选框时,文本框中的文字被改成斜体;选中“下划线”复选框时,文本框中的文字被加上下划线。
图8
主要步骤提示:
(1)新建一个工程;
(2)建立如图6所示的应用程序界面(包括1个文本框、3个复选框CheckBox);
(3)编写各控件的事件过程,其中复选框“粗体”、“斜体”、“下划线”的名字分别是Check1、Check2、Check3。
相应的代码如图9;
(4)保存工程,运行并调试。
图9
上机题5:
设计一个简单记事本程序,程序初始界面如图10所示。
该程序能够在右边文本编辑区内输入多行文字,并通过单击左边列表框里相应的字号来修改编辑区里文本字体的大小。
另外,通过单击“添加”按钮会弹出一个如图11的输入对话框来添加新的字号;单击“删除”按钮删除选中的字号;单击“清除”按钮清除列表框内所有的字号。
图10
图11
主要步骤提示:
(1)新建一个工程;
(2)建立如图10所示的应用程序界面(包括1个文本框、1个标签,一个列表框ListBox和3个命令按钮);
(3)按图11的样式来设计界面,注意为使文本框能输入多行文本需把文本框的MultiLine属性设置为true;
(4)编写各控件的事件过程,其中复选框“添加”、“删除”、“清空”三个命令按钮的名字分别是command1、command2、command3,列表框的名字为List1。
相应的代码如图12;
(5)保存工程,运行并调试。
图12
上机题6:
设计如图13所示的程序,该程序通过三个滚动条来改变窗体的颜色。
图13
主要步骤提示:
(1)新建一个工程;
(2)建立如图13所示的应用程序界面(包括3个标签,3个水平滚动条HScrollBar);
(3)将3个水平滚动条的min属性值都设为0,max属性值都设为255;
(4)编写各控件的事件过程,其中三个水平滚动条从上到下的名字依次是:
HScroll1、HScroll2、HScroll3。
相应的代码如图14;
(5)保存工程,运行并调试。
图14
三、注意事项:
(1)上机题2中在实现除法运算的时候要扣除除数为0的情况(可弹出对话框提示除数不能为0);
(2)在上机题2中在各个运算都能得出正确结果后试着将代码中的“val”去掉,例如加法运算代码改成“text3.text=text1.text+text2.text”看看结果会变成什么?
想想为什么会出现这个结果;
(3)通过上机题3与上机题4明确单选按钮与复选框的用法;
(4)输入对话框的相应知识参阅课本P148。
实验四常量、变量、函数、表达式的应用(4学时)
一、上机目的
1、掌握VB数据类型;
2、学会定义符号常量;
3、掌握变量的类型及定义方法;
4、学会使用VB表达式;
5、掌握VB常用内部函数的用法。
二、上机内容及主要步骤
上机题1:
编写一个程序,该程序通过输入一个圆的半径,能求出圆的周长和面积。
主要步骤提示:
(1)建立一个标准工程文件。
(2)双击Form1窗体,进入代码编辑窗口,在Form1的Click事件中输入程序代码(代码中横线部份需要根据后面注释补充完整):
PrivateSubForm_Click()
__________________________’定义单精度型变量R,S和L
__________________________’定义单精度符号常量PI,赋值为3.14
R=Val(InputBox(“请输入该圆的半径:
”))
S=_______________________’计算圆的面积
L=_______________________’计算圆的周长
Print“圆的面积为:
”;S
Print“圆的周长为:
”;L
EndSub
(3)运行程序,单击窗体,观察运行结果,并保存工程文件。
上机题2:
分别定义几个符号常量(如双精度、字符串型、日期时间型等符号常量),并根据提示赋予相应的初值,最后用Print语句输出相应结果。
主要步骤提示:
(1)建立一个标准工程文件。
(2)双击Form1窗体,进入代码编辑窗口,在Form1的Click事件中输入以下程序代码(代码中横线部份需要根据后面注释补充完整):
PrivateSubForm_Click()
______________’定义PI为双精度符号常量,并赋值为3.14。
Print“PI=”;PI
______________’定义VB6为字符型符号常量,并赋值为“VisualBasic6.0”。
Print“VisualBasic6.0”
Print“VB6=”;VB6
______________’定义BIRTHDAY为日期型符号常量,并赋值为你的生日。
Print“我的生日是:
”;BIRTHDAY
___________’定义BEGIN_TIME为日期型符号常量,并赋值为7:
50:
20AM
PrintBEGIN_TIME
EndSub
(3)运行程序,单击窗体,观察运行结果,并做记录。
上机题3:
定义一个变体型变量somevalue,并赋予几个不同类型的值,观察变体型变量类型的变化。
主要步骤提示:
(1)建立一个标准工程文件。
(2)双击Form1窗体,进入代码编辑窗口,在Form1的Click事件中输入下列程序代码(代码中横线部份需要根据后面注释补充完整):
PrivateSubForm_Click()
_____________________’声明somevalue为变体型变量
Somevalue=“200”’存入字符串“200”
Printsomevalue;”它的类型是:
”;typename(somevalue)
Somevalue=somevalue-20’somevalue的值为数值180
Printsomevalue;”它的类型是:
”;typename(somevalue)
Somevalue=“abc”&somevalue’somevalue的值为字符串“abc180”
Printsomevalue;”它的类型是:
”;typename(somevalue)
EndSub
(3)保存文件。
(4)运行文件,单击窗体,观察运行结果,并作记录。
上机题4:
按要求填写代码,并观察输出结果。
主要步骤提示:
(1)建立一个标准工程文件。
(2)双击Form1窗体,进入代码编辑窗口。
在Form的Click事件中输入下列代码:
PrivateSubForm_Click()
Constpiassingle=3.14
Print_______________’在窗体上显示Sin30°的值。
Print_______________’在窗体上显示∣-10∣的值。
PrintSgn(-10)’在窗体上返回-10的符号。
Print_______________’在窗体上显示字母A的ASCII码值。
PrintChr(65)
Print______________’在窗体上显示“HOWAREYOU!
”的小写形式。
Print______________’在窗体上显示字符串“HOWAREYOU!
”的长度。
Print___________’在窗体上返回字符串“HOWAREYOU!
”的第6个字符。
Print_______________’在窗体上显示系统当前日期。
Print_______________’在窗体上显示系统当前日期和时间。
Print_______________’在窗体上显示系统当前的年份。
EndSub
(3)保存文件。
(4)运行文件。
单击窗体,观察运行结果,并作记录。
三、注意事项:
(1)上机题1的答案如下:
DimrAsSingle,sAsSingle,lAsSingle
ConstpiAssingle=3.14
s=pi*r^2
l=2*pi*r
(2)上机题2的答案如下:
ConstPIAsDouble=3.14
ConstVB6AsString="VisualBasic6.0"
ConstBIRTHDAYAsDate=#1/1/2009#
ConstBEGIN_TIMEAsDate=#12:
00:
00PM#
(3)上机题3的答案如下:
Dimsomevlueasvariant
另外,“&”是字符串通用连接运算符(参阅课本P78)
(4)上机题4的答案如下:
PrintSin(30*pi/180)
PrintAbs(-10)
PrintAsc("A")
PrintLCase("HOWAREYOU!
")
PrintLen("HOWAREYOU!
")
PrintMid("HOWAREYOU!
",6,1)
PrintDate
PrintNow
PrintYear(Date)
另外,该题所调用的系统内部函数请参阅课本P79-P84
实验五顺序结构和选择结构(4学时)
一、上机目的
1、掌握顺序结构程序设计方法;
2、掌握选择结构程序设计方法。
二、上机内容及主要步骤
上机题1:
编写一个程序,该程序实现了两个变量的值调换功能,程序初始界面如图1。
单击“调换”按钮时变量1与变量2的值对调,单击“清空”按钮时两个文本框清空,并且将焦点放在第一个文本框内。
图1
主要步骤提示:
(1)建立一个标准工程文件,并按图1所示设计好程序界面;
(2)双击“调换”按钮,进入代码编辑窗口,在该按钮的Click事件中输入程序代码(代码中横线部份请先填写完整):
PrivateSubCommand1_Click()
DimaAsInteger,bAsInteger,tAsInteger
a=Text1.Text
b=Text2.Text
________________
⎽⎽⎽⎽⎽⎽⎽⎽⎽⎽⎽⎽⎽⎽⎽⎽
________________
Text1.Text=a
Text2.Text=b
EndSub
(3)双击“清空”按钮,编写该按钮的单击事件代码,代码如图2:
图2
(4)保存工程,运行并调试。
上机题2:
商场为了促销,经常采用购物打折的销售办法,根据购物款的多少将折扣分为若干种,例如:
⑴购物款在1000元(含1000元)以上,打7.5折。
⑵购物款在500~1000元(含500元)之间,打8.5折。
⑶购物款在200~500元(含200元)之间,打9折。
⑷购物款在200以下,不打折。
请编写一个初始界面如图3的程序:
当输入客户购物金额后单击“结账”按钮会显示出相应的折扣、优惠金额和实际付款数;单击“重置”按钮程序回到初始状态。
图3
主要步骤提示:
(1)建立一个标准工程文件,并按图3设计好程序界面;
(2)编写各按钮的事件过程,其中“结账”、“重置”按钮的名字分别是command1、command2。
相应的代码如图4;
图4
(3)保存工程,运行并调试。
上机题3:
编制一个程序,界面如图5。
输入的自变量x的值,利用下列公式求函数值y。
x3-1x<0
x2+10≦x<10
Y=
2x10≦x<20
x/2x>20
图5
主要步骤提示:
(1)建立一个标准工程文件,按图5设计好程序界面;
(2)编写各按钮的事件过程,其中“求值”、“清空”按钮的名字分别是command1、command2。
相应的代码如图6;
图6
(3)保存工程,运行并调试。
三、注意事项:
(1)上机题1答案:
t=a
a=b
b=t
实验六循环结构(4学时)
一、上机目的
掌握循环结构程序设计方法
二、上机内容及主要步骤
上机题1:
编写一个程序,该程序用来求1×2×3×…×10的积。
主要步骤提示:
(1)建立一个标准工程文件。
(2)双击Form1窗体,进入代码编辑窗口,在Form1的Click事件中输入程序代码:
PrivateSubForm_Click
DimsAsLong,iAsInteger
S=1
______________________
______________________
______________________
Prints
EndSub
(3)运行程序,观察运行结果。
上机题2:
编写一个程序,初始界面如图1。
该程序能生成20个1~10之间的随机数,并统计出其中偶数的个数和奇数的个数。
主要步骤提示:
(1)建立一个标准工程文件,并按图1设计好程序界面;
(2)编写各按钮的事件过程,其中“生成随机数”和“退出”按钮的名字分别是command1、command2。
相应的代码如图2所示:
(3)保存工程,运行并调试。
图1
图2
三、注意事项:
(1)上机题1答案:
fori=1to10
s=s*i
next
请大家思考一下,本题如果用DoWhile……Loop语句如何实现呢?
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 程序设计 上机 指导