VB函数怎么写

Question

X , Y   是随别的数据而变化，Z不变
X=A*B+C+D+......
Y=A*C-E-F-......
X/Z-Y/Z>=0W=Y/Z     求Y的最小双精 请问以上的VB2008语句怎么写 在线等！！！！请高人解答 

Answer 1

Private Function w(x As Single, y As Single) As Single'你的计算，W里面存放着结果
    w = x + yEnd Function
'这样使用
Private Sub Command1_Click()
    Me.Caption = w(Val(Text1.Text), Val(Text2.Text))
End Sub在线等！！！！请高人结帖

Answer 2

如果是自定义公式。还是用第三方的库Matlab试试。

Answer 3

Y的值随textbox1.text的值会改变，X的值不变，那么我需要在textbox里输入的值必须是大于
X的最小值你所指的是两个固定值提取最小值。而我要的是那个textbox1里输入的最小值
例如2Y-X>0
X=10那么Y就>=5以上的双精数，我需要的是这些双精数的最小值也就是5