求VB計算長方形的周長和面積程式設計 長方形的周長和面積程式設計

求VB計算長方形的周長和面積程式設計 長方形的周長和面積程式設計

你只需要程式設計麼？
Private Sub Command1_Click（）
If Val（Text1.Text）> 0 And Val（Text2.Text）> 0 Then
Label1.Caption =“長方形的面積為：”& Val（Text1.Text）* Val（Text2.Text）
Label2.Caption =“長方形的周長為：”& 2 *（Val（Text1.Text）+ Val（Text2.Text））
Else
MsgBox“您輸入的數據不規範，請重新輸入！”，，“提示”
End If
End Sub

VB程式設計題.輸入三角形三條邊a，b，c的值，根據其數值，判斷能否構成三角形.不要求判斷是具體什麼三角形

Private Sub Command2_Click（）
Dim a，b，c
a = Text1.Text
b = Text2.Text
c = Text3.Text
If a - b < c And a - c < b And b - c < a And a + b > c And a + c < b And b + c > a Then
MsgBox“該組數可構成三角形”
Else
MsgBox“該組數不可構成三角形”
End If
End Sub

三角形知道底24和高10面積怎樣算周長
三角形知道底24和高10怎樣算周長

設三角形的高將底分成x和24-x兩部分三角形的三邊：24，√（10²；+x²；），√（10²；+（24-x）²；），周長即為三者的和來看2個特殊情况：當x=0或24時，三角形成為直邊為24和10的直角三角形，三邊：24,10,26，周長60當…