vb做一个自定义函数过程
vb做一个自定义函数过程有4个文本框text1,2,3.text输入的值分别等于a,b,ctext4.text=s公式如下:P=（a+b+c）/2s=(p*（p-a）*（...
vb做一个自定义函数过程有4个文本框text1,2,3.text输入的值分别等于a,b,c text4.text=s
公式如下:
P=（a+b+c）/2
s=(p*（p-a）*（p-b）*（p-c）)
就是求三角形的自定义函数过程 展开
公式如下:
P=（a+b+c）/2
s=(p*（p-a）*（p-b）*（p-c）)
就是求三角形的自定义函数过程 展开
1个回答
展开全部
Private Function Test(a, b, c)
p = (a + b + c) / 2
s = (p * (p - a) * (p - b) * (p - c))
Test = s
End Function
Private Sub Form_Load()
text4.Text = Test(Val(text1.Text), Val(text2.Text), Val(text3.Text))
End Sub
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
