viernes, 19 de diciembre de 2008

Bases de datos en Excel Parte II. Botón Eliminar.

Private Sub BotonEliminarRegistro_Click()
If CanRegistros = 0 Then Exit Sub
EliminarRegistroEstudiante (Registro + 1)
CanRegistros = CanRegistros - 1
Me.BotonAtras.Value = True
If CanRegistros = 0 Then
Me.BotonModificar.Enabled = False
Me.BotonEliminarRegistro.Enabled = False
Me.BotonBuscar.Enabled = False
End If

End Sub

EliminarRegistroEstudiante es una subrutina o subprogama que debe aparecer en Módulos, ModulosEstudiante, que se menciono anteriormente.

No hay comentarios:

Datos personales