1樓:聽不清啊
在窗體中做4個文字框和一個命令按鈕,**如下:
private sub command1_click()a = val(text1.text)
b = val(text2.text)
c = val(text3.text)
if a < b + c and b < a + c and c < a + b then
p = (a + b + c) / 2
s = sqr(p * (p - a) * (p - b) * (p - c))
text4.text = s
else
text4.text = "不能構成三角形!"
end if
end sub
用vb程式設計一個求三角形面積的**
vb求三角形面積
vb程式設計根據三角形的三個邊長計算其面積的**?
VB求三角形面積,VB 程式設計計算三角形面積
在窗體中做4個文字框和一個命令按鈕,如下 private sub command1 click a val text1.text b val text2.text c val text3.text if a b c and b a c and c a b then p a b c 2 s sqr p...
vb三角形判斷程式,VB三角形判斷程式
簡單的給你講一下思路吧,構成三角形的條件是,a b c,就是任意兩邊的和大於第三邊,用and連線判斷條件語句,必須都成立的情況下才是三角形。判斷是否直角就是利用勾股定理,你可以找出較小的兩條邊進行勾股定理,比如a和b,a a b b是否等於c c,等於就是直角三角形,前提是較小邊的平方和。計算面積就...
三角形面積計算公式,三角形面積怎麼計算
1 三角形面積 1 2 底 高 三邊都可做底 2 三角形面積 1 2absinc 1 2acsinb 1 2bcsina 3 三角形面積 abc 4r 其中r是三角形外接圓半徑 三角形面積怎麼計算 三角形面積公式 1 面積 底 高 2。其中,a是三角形的底,h是底所對應的高 註釋 三邊均可為底,應理...