.NET Fiddle

VbNet · Console

/Program.vb

Imports System
				
Public Module Module1
	Public Sub Main()
		Dim x as Single = Math.Pow(2, 24)
		Dim y as Single = x + 1
		Console.WriteLine(x.ToString("G29"))
		Console.WriteLine(y.ToString("G29"))
		Console.WriteLine(x = y)
	End Sub
End Module