有了这个技能就可以轻松计算三角形（还可以完成信息老师布置的作业）
工具/原料
vb
设计界面
1
打开VB建立一个工程，设计一个界面（下图是我简单的示范）
2
把text1的属性名改成a=
3
依次修改text2，text3，text4，button的属性名（如下图）
编程
1
双击button进入编辑
2
输入代码Dim a, b, c, q, s As Singlea = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)If (a + b > c) And (a + c > b) And (c + b > a) Thenq = (a + b + c) / 2s = Sqr(q * (q - a) * (q - b) * (q - c))Text4 = Format(s, '0.##')Elsems = MsgBox('不能构成三角形，重新输入边长:', 0, '提示:')Text1 = ''Text2 = ''Text3 = ''Text1.SetFocusEnd If
测试
1
单击运行启动开始测试
2
输入任意一个不能构成三角形的值，测试效果
3
输入任意一个能构成三角形的值，测试效果
保存
1
保存工程
2
打开exe文件进行计算
上一篇：三角形的体积公式是什么
下一篇：怎么计算多边形的面积？