ADO Database VB.Net

Imports System
Imports System.Data
Imports System.Data.Common
    Public Class MainClass
        Public Shared Sub Main()
            Using providers As DataTable = DbProviderFactories.GetFactoryClasses
                For Each prov As DataRow In providers.Rows
                    Console.WriteLine(" Name:{0}", prov("Name"))
                    Console.WriteLine("   Description:{0}", prov("Description"))
                    Console.WriteLine("   Invariant Name:{0}", prov("InvariantName"))
                Next
            End Using
        End Sub
    End Class