Advertisement
tuldok89

Untitled

Oct 13th, 2011
88
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Public Class Form1
  2.  
  3.     Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
  4.         MsgBox(InverseSineAsDegrees(Math.Sqrt(2) / 2))
  5.     End Sub
  6.  
  7.     Public Function InverseSineAsDegrees(ByVal n As Double) As Double
  8.         Return Math.Asin(n) * (180 / Math.PI)
  9.     End Function
  10. End Class
  11.  
  12.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement