正切=正弦÷余弦.因此,你要知道正弦值.这样就能求道正切,VB 提供了反正切 Atn 函数.注意:求出的是弧度值
大姐,余弦值不一样了,正切值不也就不一样了?每次变换三角形变长后再次计算就是了
private function Jiaoduzhi(duibian as double,linbian as double,xiebian as double)
if duibian > 0 and xiebian>0 and linbian >0 then
sinX=duibian/xiebian
cosX=linbian/xiebian
secX=sinX/cosX
return atn(secX)
end if
end function