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())