Data Types VB.Net

Imports System
Imports System.Data
Imports System.Collections
public class MainClass
   Shared Sub Main()
        Dim A As Boolean
        Dim I As Integer
        I = 5
        A = CBool(I)
        Console.WriteLine("Value of Boolean assigned from 5 is : " + A.ToString())
        I = CInt(A)
        Console.WriteLine("And converted back to Integer: " + I.ToString())
   End Sub
End Class