VB实验报告书(实验 四 )
班级：管08A-5        学号： 10901060201    姓名：张跃洋
实验题目
顺序结构
实验目的
1. 掌握赋值语句的使用方法
2. 掌握数据输入、输出函数和语句，尤其是InputBox函数
实验内容
程序1：编程输入圆的半径，计算并输出圆的周长和面积。
方法一：用Inputbox函数实现圆半径的输入，用Print方法输出周长和面积。
方法二：用文本框控件实现半径的输入，用标签控件实际周长和面积的输出。
程序2：从键盘上输入4个数，编写程序，计算并输出这4个数的和及平均值。通过InputBox函数输入数据，在窗体上显示和及平均值。
Private Sub Command1_Click()
a = "请输入第一个数""输入并计算"
b = "请输入第二个数""输入并计算"
c = "请输入第三个数""输入并计算"
d = "请输入第个数""输入并计算"
并输出
yi = InputBox(a, "输入成绩")
er = InputBox(b, "输入成绩")
san = InputBox(c, "输入成绩")
si = InputBox(d, "输入成绩")
qh = Val(yi) + Val(er) + Val(san) + Val(si)
pjz = (Val(yi) + Val(er) + Val(san) + Val(si)) / 4
Text1.Text = qh
Text2.Text = pjz
End Sub
程序3：InputBox函数的操作
实验步骤：
（1）在窗体上画两个文本框和一个命令按钮
（2）从键盘上输入两个数值，然后把它们相加、联接，并将结果在文本框中显示出来。程序运行后，单击命令按钮，分别在输入对话框中输入12345和67890。
提示：利用InputBox函数将字符串进行相加和联接。
Private Sub Command1_Click()
Dim a As Double
Dim b As Double
a = InputBox("输入第一个数")
b = InputBox("输入第一个数")
Text1.Text = Val(a) & Val(b)
Text2.Text = Val(a) + Val(b)
End Sub
编译、运行过程中出现的主要问题及解决方法
&和+的区别：两个数值运算时
“+”运算是将两个数值相加，结果为数值
“&”运算是将两个数值连接，结果为字符串
运行
结果

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。