Imports System
Public Module Module1
Public Sub Main()
'Test 0
Dim test as Double = 0
test = 0
if (test = 0) then
Console.WriteLine("0")
End if
if (test = 0.0) then
Console.WriteLine("0.0")
'Test 0.0
Dim test2 as Double = 0
test2 = 0.0
if (test2 = 0) then
if (test2 = 0.0) then
End Sub
End Module