Imports System
Class Sample
Public Shared Sub Main()
Dim mySingle As Nullable(Of System.Single) = 12.34F
Dim yourSingle As Nullable(Of System.Single) = - 1.0F
Console.WriteLine(mySingle)
Console.WriteLine(yourSingle)
yourSingle = mySingle.GetValueOrDefault()
Console.WriteLine(mySingle)
Console.WriteLine(yourSingle)
mySingle = Nothing
yourSingle = mySingle.GetValueOrDefault()
Console.WriteLine(mySingle)
Console.WriteLine(yourSingle)
mySingle = 12.34F
yourSingle = - 1.0F
Console.WriteLine(mySingle)
Console.WriteLine(yourSingle)
yourSingle = mySingle.GetValueOrDefault(- 222.22F)
Console.WriteLine(mySingle)
Console.WriteLine(yourSingle)
mySingle = Nothing
yourSingle = mySingle.GetValueOrDefault(- 333.33F)
Console.WriteLine(mySingle)
Console.WriteLine(yourSingle)
End Sub
End Class