以下是的大学VB考试题 实在不会帮帮忙谢谢了
用钢丝法确定轴系理论中心线，钢丝线在首、尾基准点不同位置处饿挠度YY=q*x(L-x)/(0.99*2T)(mm)
式中 q——钢丝单位长度的重量 N/m
x——所求挠度处到基准点的距离 m
L——首、尾基准点间的距离 m
T——拉力 ９.８Ｎ
０.９９——修正系数 --------------------编程问答-------------------- 问题呢？ --------------------编程问答--------------------
Private Function yPoint(ByVal q As Double, ByVal x As Double, ByVal L As Double, ByVal T As Double) As Double
yPoint = q * x * (L - x) / (0.99 * (2 * T))
End Function
Private Sub Form_Load()
DeBug.Print yPoint(1, 1, 1, 1) & "mm"
End Sub
补充：VB , 基础类
