VB.Net Guide

Vb.Net has built in functions for Sine, Cosine, Tan etc. However, as with most computer languages, angles are measured in a unit called Radians but many books and calculators measure angles in Degrees. Degrees and Radians are a bit like Miles and Kilometres - using the wrong unit will produce the wrong answer.
There is a long number starting 3.14... It is so popular in Mathematics that VB will automatically use this special number whenever you reference Math.PI
Here are some handy functions

Public Function DegFromRad(radians as Double) as Double
 Return radians * Math.PI / 180
End Function

Public Function RadFromDeg(degrees as Double) as Double
 Return degrees * 180 / Math.PI 
End Function

The following examples demonstrate built-in functions but the angle must be in radians

Public Function Sine(angle as Double) as Double 
 Return Math.Sin(angle) 
End Function

Public Function Cosine(angle as Double) as Double
 Return Math.Cos(angle) 
End Function

Public Function Tangent(angle as Double) as Double
 Return Math.Tan(angle)
End Function

Public Function ASine(valu as Double) as Double
 Return Math.ASin(valu)
End Function

Public Function ACosine(valu as Double) as Double
 Return Math.ACos(valu)
End Function

Public Function ATangent(valu as Double) as Double
 Return Math.ATan(valu)
End Function

Public Function ATangent2(x As Double, y As Double) As Double
 Return Math. Atan2(x, y) 
End Function

When the angle is in degrees, you need functions similar to these

Public Function SineD(angle as Double) as Double
 Return Math.Sin(angle * Math.PI / 180)
End Function

Public Function CosineD(angle as Double) as Double
 Return Math.Cos(angle * Math.PI / 180)
End Function

Public Function TangentD(angle as Double) as Double
 Return Math.Tan(angle * Math.PI / 180)
End Function

Public Function ASineD(valu as Double) as Double
 Return Math.ASin(valu) * Math.PI / 180
End Function

Public Function ACosineD(valu as Double) as Double
 Return Math.ACos(valu) * Math.PI / 180
End Function

Public Function ATangentD(valu as Double) as Double
 Return Math.ATan(valu) * Math.PI / 180
End Function

Public Function ATangent2D(x As Double, y As Double) As Double
 Return Math. Atan2(x, y) * 180 / PI
End Function

Some books use alternative words for ASin e.g. ArcSin, InvSin or Sin^-1 Similar phrases are also used for ACos, Atan and Atan2

The code functions on this site are only intended as a learning aid. Data validation is often ommited to assist users unfamiliar with Visual Basic. The information may be untested, unrelaible or unsuitable for your requiremensts. It is presented in a non-commercial form as an ex-gratia attempt to be helpful. By making any use of information contained on these pages, you agree to fully absolve and indemnify DigitalDan in relation to any issue arising out of such use.