AdminSoft

        ' id Catalogos ************
        '1 clientes
        '2 proveedores
        '3 productos
        '4 paquetes
        '5 agentes de venta
        ' **************************

        'Cargar clasificaciones del catalogo de productos
         Me.ObjAdmonClasificaciones.MdoObtenerclasificacion_x_idcatalogo(3)

        'obtener nombre de la clasificacion 1
        lblClasificacion1.Text = Me.ObjAdmonClasificaciones.idclasificacion1Nombre.ToString
        'cargar los elementos de la clasificacion 1
        Me.ObjAdmonClasificaciones.MdoObtenerElementosclasificacion_x_idcatalogo_y_x_idClasificacion(3, 1)
        'llenar combobox con los elementos de la clasificacion 1
        CBoxElemClas1.Items.Add("")
        CBoxElemClas1.Items.AddRange(Me.ObjAdmonClasificaciones.ElementosClasificacion.ToArray)

        'obtener nombre de la clasificacion 2
        lblClasificacion2.Text = Me.ObjAdmonClasificaciones.idclasificacion2Nombre.ToString
        'cargar los elementos de la clasificacion 2
        Me.ObjAdmonClasificaciones.MdoObtenerElementosclasificacion_x_idcatalogo_y_x_idClasificacion(3, 2)
        'llenar combobox con los elementos de la clasificacion 2
        CBoxElemClas2.Items.Add("")
        CBoxElemClas2.Items.AddRange(Me.ObjAdmonClasificaciones.ElementosClasificacion.ToArray)

        'Y asi sucesivamente....