UC知道简单VB，高手帮帮。。
来源：百度知道 编辑：UC知道 时间：2024/06/01 19:44:41
编制一个函数或过程，用来判断任意三边长是否能构成一个三角形，如果能，则输出三角形的类型（一般三角形、直角三角形等，其他类型可以酌情实现）。
设计思想：
a，b，c三边构成三角形的必要条件是：a+b>c and b+c>a and a+c>b。
对VB一窍不通。。。帮忙给个具体代码，谢谢
设计思想：
a，b，c三边构成三角形的必要条件是：a+b>c and b+c>a and a+c>b。
对VB一窍不通。。。帮忙给个具体代码，谢谢
'这个你参考下，刚给别人写的
'你添加三个label控件，三个TextBox控件，两个CommandButton控件就可以了
Dim a, b, c As Double
Dim P As String
Private Sub Command1_Click()
If IsNumeric(Text1.Text) And IsNumeric(Text2.Text) And IsNumeric(Text3.Text) Then
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
If a + b > c And Abs(a - b) < c Then
P = "一般三角形！"
If a = b Or a = c Or b = c Then
P = "等腰三角形！"
If a = b = c Then
&