Mega Code Archive

 

Categories / VB.Net / Development

 

Math Cos returns the cosine of the specified angle

Imports System Imports Microsoft.VisualBasic Module SinCos     Sub Main()         Dim angle As Double = Math.PI * 30 / 180.0         Dim sinAngle As Double = Math.Sin(angle)         Dim cosAngle As Double = Math.Cos(angle)     End Sub  End Module