例: ASin function

Dim rad As Double
Dim degrees As Double
' Assign the value pi/2, the angle whose sine is 1.
rad# = ASin(1)
' Assign the value 90, the same angle in degrees.
degrees# = rad# * (180 / pi)

Print rad#, degrees#          ' Prints  1.5707963267949  90