admin 管理员组文章数量: 1184232
2024年3月27日发(作者：javascript页面交互)
VB实验报告书(实验 四 )
班级：管08A-5 学号： 1 姓名：张跃洋
实验题目
顺序结构
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
= qh
= 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("输入第一个数")
= Val(a) & Val(b)
= Val(a) + Val(b)
End Sub
1 / 3
编译、运行过
程中出现的
主要问题及
解决方法
运行
结果
&和+的区别：两个数值运算时
“+”运算是将两个数值相加，结果为数值
“&”运算是将两个数值连接，结果为字符串
2 / 3
3 / 3
版权声明：本文标题：在窗体上显示和及平均值。利用InputBox函数将字符串进行相加和 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/p/1711519061a598038.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论