Question

VBA设计窗体输入三边长计算三角形面积

要求像图中那样输入三边长 然后在msgbox中显示出面积

我写的代码如上 能运行，但运行结果不对 比如我输三边都是1，计算结果是2000多。。。。。

问题出在哪儿？要怎么改？求大神指教





Answer 1

把a=a.value
b=b.value
c=c.value
改成 a=a.value*1
b=b.value*1
c=c.value*1
原因是: VBA中"1"+"1"+"1"="111"。所以你那个s=55.5了

追问

还是不行啊 改了之后输三边都是1结果还是两千多 输3,4,5结果是0

追答

Answer 2

好像没有错啊。