VB程序设计:判断任意的三条边长能否构成三角形并计算其面积
来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/06/06 02:01:37
VB程序设计:判断任意的三条边长能否构成三角形并计算其面积
应用InputBox()函数和MsgBox语句与函数的使用方法,单击判断按钮调用InputBox函数,分别将任意的三个数字输入,输入完毕后将三个数字分别显示在三个text控件中,程序自动判断三个数字能否构成三角形,如果能则在Label4显示其三条边长的数据,在Label5中显示其构成的面积;如果不能构成三角形则利用Msgbox提示“不能构成三角形”.如果输入有负数时,也利用Msgbox提示“您所输入的数据无效”
应用InputBox()函数和MsgBox语句与函数的使用方法,单击判断按钮调用InputBox函数,分别将任意的三个数字输入,输入完毕后将三个数字分别显示在三个text控件中,程序自动判断三个数字能否构成三角形,如果能则在Label4显示其三条边长的数据,在Label5中显示其构成的面积;如果不能构成三角形则利用Msgbox提示“不能构成三角形”.如果输入有负数时,也利用Msgbox提示“您所输入的数据无效”
单击Command1即可.代码如下.
Dim a As Single,b As Single,c As Single,p As Single,S As Single
Private Sub Command1_Click()
On Error GoTo e
a = InputBox("a=")
b = InputBox("b=")
c = InputBox("c=")
p = (a + b + c) / 2
If a < p And b < p And c < p Then
S = Sqr(p * (p - a) * (p - b) * (p - c))
MsgBox S
Else
GoTo e
End If
Exit Sub
e:
MsgBox "不能构成三角形"
End Su
Dim a As Single,b As Single,c As Single,p As Single,S As Single
Private Sub Command1_Click()
On Error GoTo e
a = InputBox("a=")
b = InputBox("b=")
c = InputBox("c=")
p = (a + b + c) / 2
If a < p And b < p And c < p Then
S = Sqr(p * (p - a) * (p - b) * (p - c))
MsgBox S
Else
GoTo e
End If
Exit Sub
e:
MsgBox "不能构成三角形"
End Su
VB程序设计:判断任意的三条边长能否构成三角形并计算其面积
给定三角形的三条边长,计算三角形的面积.编写程序首先判断出的三条边能否构成三
VB编程:从键盘输入三角形的三边,判断能否构成三角形:如果能构成三角形,则计算其面积
在Vb中,.编写程序,首先判断给出的3条边能否构成三角形,如可以,计算并输出该三角形的面积,输入0结束程序
VB编程 输入三角形三条边长啊,a,b,c的值,根据其数值,判断是否构成三角形.
c++编写程序根据键盘输入的边长计算三角形的面积并输出,判断能否构成三角形及三角形的面积设计成函数形式
从键盘上输入三角形的三边,并判断任意两边之和是否大于第三边,然后计算其周长和面积 VB代码
怎么用C语言输入三角形的三条边长,计算并输出三角形的面积
已知任意三角形的三条边长,求面积?
已知三条边长的任意三角形怎么算面积?
vb编程.判断三条边能否构成三角形
c#输入三角形的三条边长a、b和c,按海伦公式计算三角形面积并输出