public class Test public Shared Sub Main Dim D As Double D = 5 Console.WriteLine(D.Epsilon) End SubEnd class 4.94065645841247E-324