By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
434,824 Members | 2,337 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 434,824 IT Pros & Developers. It's quick & easy.

please help me about the code/formula

P: 2
what is the formula in vb6 of arc cosine in degrees??
thnk you!
Jan 16 '08 #1
Share this Question
Share on Google+
1 Reply


P: 12
what is the formula in vb6 of arc cosine in degrees??
thnk you!
Expand|Select|Wrap|Line Numbers
  1. Function ACos(ByVal number As Double) As Double
  2.     If Abs(number) <> 1 Then
  3.         ACos = 1.5707963267949 - Atn(number / Sqr(1 - number * number))
  4.     ElseIf number = -1 Then
  5.         ACos = 3.14159265358979
  6.     Elseif number=1 Then
  7.         Acos=0
  8.     End if
  9. End Function
It is returned in radians. To convert
Acosdeg = number*180/PI
Jan 16 '08 #2

Post your reply

Sign in to post your reply or Sign up for a free account.