设计一个程序,已知一个直角三角形的面积,请输入一条直角边的长度,求出另两条边的长度.界面不限.

Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click
Dim s,a,b,c As Double
s = TextBox1.Text
a = TextBox2.Text
b = 2 * s / a
c = System.Math.Sqrt(a * a + b * b)
TextBox3.Text = b
TextBox4.Text = c
End Sub
End Class


上述是最简单方法 细致可再加程序来
1）判断 一开始输入的面积和边长是否为数字
2）得出结果边长和斜边可要求保留少数点位数.


简单窗体如下 1234分别是 面积、一边长、另一边长、斜边长、