Development VB.Net

Class Sample
   Public Shared Sub Main()
        Dim doubleVal As Double
        Dim boolVal As Boolean
        
        doubleVal = 1.1
    
        boolVal = System.Convert.ToBoolean(doubleVal)
        System.Console.WriteLine("{0} as a Boolean is: {1}.",doubleVal, boolVal)
    
        doubleVal = System.Convert.ToDouble(boolVal)
        System.Console.WriteLine("{0} as a Double is: {1}.",boolVal, doubleVal)
    End Sub
End Class