System VB.Net by API

Public Class Tester
    Public Shared Sub Main
        Dim X As Single
        Dim Y As Single
        X = CSng( Math.Cos(100))
        Y = CSng( Math.Sin(100))
        Console.WriteLine(X)
        Console.WriteLine(Y)
        
    End Sub
End Class