vb实验报告Word文件下载.docx
《vb实验报告Word文件下载.docx》由会员分享,可在线阅读,更多相关《vb实验报告Word文件下载.docx(11页珍藏版)》请在冰豆网上搜索。
离开实验室
离开时仪器
机器号
15:
25
正常
17:
00
3-2
实验项目名称
实验二顺序结构
一、实验目的
1.掌握正确书写表达式、赋值语句的规则;
2.掌握常用函数的使用;
3.掌握InputBox和MsgBox的使用;
4.掌握Print方法和Format格式的使用。
。
2、实验内容
1.从以下内容中自选三个题:
2.做实验二中实验内容;
3.教材中的例题及习题;
4.符合本次实验要求的自选题。
三、实验过程(步骤、命令)及结果(截图、源程序)
(一)做自行选题1
(1)设置用户界面并进行属性设置
创建一个新的窗体,在窗体中加入控件并设置相应的属性,详见控件及属性设置表。
控件及属性设置表
控件名
属性
Label1
Caption=”身高”;
Font属性:
字号为二号,字体为隶书
Label2
Caption=”体重”;
Command1
Capion=”BMI指数”
Text1
Text=””
Text2
Text3
设置后的界面如下图
(2)设置代码
对Command1的Click(单击)事件添加如下代码:
Dimh!
t!
bmi!
h=Val(Text1.Text)
T=Val(Text2.Text)
Bmi=Round(t/(h*h),2)
Text3.Text=Str(bmi)
设置后详见下图:
运行后在文本框中输入“1.70”,“85”单击按钮后的界面图如下:
(二)做自行选题2
Caption=”商品1”;
Caption=”商品2”;
Label3
Caption=”商品3”;
Label4
Caption=”单价”;
Label5
Caption=”数量”;
Label6
Caption=”总计”;
Label7
Caption=”0”;
Capion=”计算”
Text4
Text5
Text6
(2)设置代码
对Command1的Click(单击)事件添加如下代码:
Privatesubcmd_click()
DimalAsSingle,b1AsSingle,c1AsSingle
Dima2AsInteger,b2AsInteger,c2AsInteger
DimxAsSingle
al=Val(Text1.Text)
a2=Val(Text2.text)
b1=Val(Text3.text)
b2=Val(Text4.text)
c1=Val(Text5.text)
c2=Val(Text6.text)
x=a1*a2+a1*b1+c1*c2
Lb17.Caption=Val(Lb17.caption)+x
EndSub
设置后详见下图:
运行后在文本框中输入“15”,“13”,“24"
"
2"
7"
1"
单击按钮后的界面图如下:
(三)做自行选题3
Capion=”比较”
Caption=”A”;
Caption=”B”;
Caption=”C”;
Caption=”D”;
设置后的界面如下图
DimS1!
s2!
AB!
BD!
AC!
CD!
AB=Val(Text1.Text)
BD=Val(Text2.Text)
AC=Val(Text2.Text)
CD=Val(Text2.Text)
S1=AB+BD
S2=AC+CD
IfS1>
S2Then
Text5.Text="
经C城到D城快“
Else
Text5.Text="
经B城到D城快“
EndIf
EndSub
运行后在文本框中输入“223”,“155”,“200"
143"
四、存在问题及解决方法
存在问题:
码编写过程中,出现数据不完整红字提示。
解决办法:
仔细检查并与书中例题相对照查处错因在代码末尾多加了一个逗号。
以后应该多看书,多与同学交流。
5、思考题解答
1.如何使用InputBox函数输入一个数?
InputBox(<
提示信息>
[,<
对话框标题>
][,<
输入区的默认值>
对话框坐标>
]
说明:
1)提示信息:
用于提示用户在输入框内输入什么样的信息,该项不能省略,长度不能超过1024个字符。
2)对话框标题:
用于显示输入对话框的标题信息。
3)输入区的默认值:
该信息显示在输入框内,如果用户不输入新值,当用户单击“确定”钮后,该值被当做默认只返回。
4)对话框坐标:
用于确定对话框的位置,表示对话框的左上角到屏幕左边界和上边界的距离,必须成对出现,用个逗号分隔。
2.如何使用Msgbox函数或Msgbox过程输出一行提示信息?
MsgBox([,<
提示信息>
][,<
对话框类型>
])
3.Print方法中的“,”与“;
”有什么区别?
如何输出一个空行?
语句尾部加分号“;
”代表将光标定位在上一个显示的字符之后。
逗号“,”代表将光标定位在下一个打印区的开始位置。
表达式列表如果省略则打印一个空白行。