Funcionalidad de la propiedad
Tag en Access
La propiedad Tag (información
adicional) de los controles de formularios e informes
está pensada para ser manejada directamente por
los programadores, es decir, Access no lo maneja
en modo alguno. No obstante, un uso adecuado de
dicha propiedad puede facilitar muchos aspectos
de la programación. En el siguiente ejemplo se
muestra el manejo de dicha propiedad. supongamos
un formulario que dispone de dos grupos de controles
de manera que cuando un grupo está activo el otro
no puede ser visible y viceversa. una manera de
realizarlo sería introducir en el evento OnOpen
el siguiente código:
If Opcion=1 Then
Me!Control1.visible = True
Me!Control2.visible = True Me!Control3.visible
= False Me!Control4.visible = False
Else
Me!Control1.visible = False
Me!Control2.visible = False Me!Control3.visible
= True Me!Control4.visible = True
End If
Este código funcionaría a
la perfección, pero si se modifica el formulario
y se introducen más controles se deberá cambiar
dicho código. Sin embargo, si se introduce en
la propiedad tag de cada control bien Opcion1
o bien Opcion2, dependiendo de a que conjunto
de controles pertenezca, el código resultante
será el siguiente, y nótese que no habría que
modificarlo:
Dim Frm as Form Frm = Me
If Opcion=1 Then
For I=0 mto Frm.count -1
If Frm(I).tag = "Opcion1"
Then
Frm(I).visible = True
If Frm(I).tag = "Opcion2"
Then
Frm(I).visible = False
Next I
Else
For I=0 to Frm.count -1
If Frm(I).tag = "Opcion1"
Then
Frm(I).visible = False
If Frm(I).tag = "Opcion2"
Then
Frm(I).visible = True
Next I
End If |