public class Test public Shared Sub Main Dim I As Integer = 2 I *= 5 Console.WriteLine(I) Dim D As Double = I / 3 Console.WriteLine(D) End SubEnd class 103.33333333333333