admin 管理员组

文章数量: 1087139


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://roclinux.cn/p/1711519061a598038.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。