题目

利用VB程序计算三角形面积。在文本框Text1、Text2、Text3中分别输入三角形三条边长a，b，c，半周长p ＝ (a ＋ b ＋ c) / 2，单击按钮Command1计算三角形的面积s＝ ，并把结果显示在文本框Text4中。界面如图a所示，请回答下列问题： （1） 结合图b，若要把窗体背景色改为白色，可通过其属性进行设置。 （2） 实现上述功能的VB程序如下，请在划线处填入合适代码。 Private Sub Command1_Click()     Dim a, b, c, p, s As Integer     a ＝ Val(Text1.Text)     b ＝     c ＝ Val(Text3.Text)     p ＝(a ＋ b ＋ c) / 2     If a＋b>c And a＋c>b And b＋c>a And a>0 And b>0 And c>0 Then         s ＝         Text4.Text ＝     Else         Text4.Text ＝“输入边长不能组成三角形！”     End If End Sub 答案： 【1】BackColor 【1】Val(Text2.Text)【2】sqr(p*(p－a)*(p－b)*(p－c))【3】Str(s)

查看本题答案和解析