Public Class LlenaTabla

    Private Command As New Command()
    Public Sub LlenaData(ByVal SQL As String, ByVal Tabla As DataTable)
        Try
            Tabla.Clear()
        Catch
        End Try
        Try
            Command.spsql = SQL
            Command.SeleccionCombo(Command.spsql, Tabla)
        Catch
        End Try


    End Sub

End Class