VB编程语言

2025-04-13 07:20:20

推荐回答（1个）

回答1：

经过我的测试，“热心网友”的回答有两点是必要的。
1，不是s吧,应该是area 。2，InputBox中输入的数字并非是数字,而是字符串
改正这两点之后，如果输入正确，就可以得出面积了。

但是还是提醒，Dim a, b, c, p, s As Single，这实际上只定义了s,其他都是Variant类型。
为了验证输入，可以用在条件判断中加入And IsNumeric(a) And IsNumeric(b) And IsNumeric(c) And a > 0 And b > 0 And c > 0
另外既然你要求精确，何不用Double类型？
另外你可以把计算的公式做成一个函数，返回面积，和判断语句分开，就显得更模块化一些了。