请问一下在VB里面计算三角形面积的代码是什么?

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/13 11:30:39

请问一下在VB里面计算三角形面积的代码是什么?
请问一下在VB里面计算三角形面积的代码是什么?

请问一下在VB里面计算三角形面积的代码是什么?
三角形面积的计算公式是 area = Sqr(s * (s - a) * (s - b) * (s - c)) ,其中,s = (a + b + c) / 2
Private Sub Form_Load()
Do
Dim a As Single,b As Single,c As Single,p As Single,s As Single
a = Val(InputBox("请输入三角形第1条边长"))
b = Val(InputBox("请输入三角形第2条边长"))
c = Val(InputBox("请输入三角形第3条边长"))
s = (a + b + c) / 2
If a >= s Or b >= s Or c >= s Then
MsgBox "不能构成三角形"
Else
area = Sqr(s * (s - a) * (s - b) * (s - c))
MsgBox "面积为" & area
End If
Loop
End
End Sub

请问一下在VB里面计算三角形面积的代码是什么? 设计个vb 计算三角形面积,格式如下、、、、、求代码= =不是面积公式、、、、、、、、 计算圆的面积 VB代码,就是VB里怎么计算圆的面积.用if语句,可以不. 从键盘上输入三角形的三边,并判断任意两边之和是否大于第三边,然后计算其周长和面积 VB代码 已知两点坐标,在vb中怎样计算两点连线与水平线的角度?求公式代码我需要在VB中的代码啊 VBA程序设计代码,设计一个函数,通过输入三角形的三个边长,计算三角形的面积,要求函数在标准模块中添加代码应该怎么写?急 VB中,log(X)如何计算,代码是什么,其中X是大于0的自然数 请问三角形的面积计算 通过InputBox输入三角形边长,根据边长判断三角形类型(等边、等腰、直角),并计算面积.求VB高手把代码给搞出来!越快越好啊 VBA程序设计代码,设计一个函数,通过输入三角形的三个边长,计算三角形的面积,要求函数在标准模块中添加我编了一下但是算出来不对. vb算式四舍五入在vb缩写的代码中有一个算式:(ProgressBar1.Value / Text2.Text) * 10,怎样让这个算式计算的结果只保留到整数呢?如果是小数就自动四舍五入. 如何在matlab 上计算图形面积并在figure上显示是Sierpinski垫圈的面积,我知道她趋于0,但想在代码中加一个面积计算代码是面积显示在figure上. vb编程,目的是根据输入的直角三角形的直角边长计算周长及面积.想在没填数据或者填的不是数字的时候弹出一个消息框.代码是:Private Sub Command1_Click()If IsEmpty(Text1.Text) = True Or IsEmpty(Text2.Text) 计算三角形的面积?请问怎么算? VB:编程计算三角形面积编程计算三角形面积.要求通过输入框输入三角形的三个边长a、b、c,当单击命令按钮“计算”时,计算并在文本框中显示三角形的面积area.提示:三角形面积的计算公式 VB编程:从键盘输入三角形的三边,判断能否构成三角形:如果能构成三角形,则计算其面积 怎么写计算梯形面积的代码 计算π的近似值,精确到小数点后6位 设计vb程序 需要代码 VB里面的 π/2=2^2/1*3 ×4^4/3*5 ×.×(