[size=2][size=4][size=2]Qc=P30(tanφ-tanφ′)
   =2400〔tancos-1X  0.65—tancos-1X 0.9〕=1656
括号中的-1是tancos指数   <你求助下括号中的怎么算的> [/size][/size][/size]

谁帮我下我不会

tan(arccos(0.65))-tan(arccos(0.9))???

〔tancos-1X  0.65—tancos-1X 0.9〕这算出来是0.69不知道是怎么来的

根据我的是0.6848,保留2位算是0.69.cos-1不是取倒数,是反函数的意思.
Function arccos(x)
   arccos = Atn(-x / Sqr(-x * x + 1)) + 2 * Atn(1)
End Function
Private Sub Form_Click()
   a = Tan(arccos(0.65))
   b = Tan(arccos(0.9))
   c = 2400 * (a - b)
End Sub

解决了吧