Agregar campos a formulario mediante boton
Publicado por Marcelo (1 intervención) el 07/07/2018 23:14:32
Hola, tengo el siguiente problema. Tengo un codigo el cual uso, mediante un boton, para agregar campos de una tabla al formulario. El tema es que yo quiero que ese boton vaya sumando numeros del contador hasta 15 nada mas, y a la inversa, otro boton resta campos y detenga el contador en 0. Actualmente no puedo establecer ese limite.
para sumar:
para restar
Gracias por la ayuda
para sumar:
1
2
3
4
5
6
7
8
9
Private Sub agregar_Click()
Contador = Contador + 1
For Each Control In Form.ControlsIf Control.ControlName = "Farmaco_" & Contador Then
Control.Visible = True
End If
Next
End Sub
para restar
1
2
3
4
5
6
7
8
Private Sub restar_Click()
For Each Control In Form.ControlsIf Control.ControlName = "Farmaco_" & Contador Then
Control.Visible = False
End If
Next
Contador = Contador - 1
End Sub
Gracias por la ayuda
Valora esta pregunta
0
