تابع هاي مثلثاتي در ويژوال بيسيک / فان پاتوق

- ویژوال بیسیک /محیط های مبتنی بر زبان بیسیک

در این زبان امکان arctan/Sin/cos/tan/موجود می باشد

برای استفاده از بقیه فرمولها توابعی به صورت زیر تعریف کنید

توجه کنید عبارت بعد از کتیشن کامنت است و دلخواه است وبرای توضیح استفاده میشود.
کتانژانت:

Public Function Cotan(ByVal x As Double) As Double
" Cotangent
Cotan = 1 / Tan(x)

End Function

-___________________________________

سکانت :
Public

Function Sec(ByVal x As Double) As Double