03/02/2004, 15:42
|
| | Fecha de Ingreso: noviembre-2002
Mensajes: 53
Antigüedad: 22 años, 1 mes Puntos: 0 | |
Tienes que programar en el Editor de Visual Basic en Access. Te envío un ejemplo muy sencillo.
'---------------------------------------------------
Private Sub cmdActivar_Click()
On Error GoTo Err_cmdActivar_Click
Texto0.Enabled = True
Texto1.Enabled = True
Texto2.Enabled = True
Texto0.BackColor = 255
Texto1.BackColor = 16711680
Texto2.BackColor = 65535
Texto0.SetFocus
Exit_cmdActivar_Click:
Exit Sub
Err_cmdActivar_Click:
MsgBox Err.Description
Resume Exit_cmdActivar_Click
End Sub
'---------------------------------------------------
Private Sub cmdDesactivar_Click()
On Error GoTo Err_cmdDesactivar_Click
Texto0.Enabled = False
Texto1.Enabled = False
Texto2.Enabled = False
Texto0.BackColor = 16777215
Texto1.BackColor = 16777215
Texto2.BackColor = 16777215
Exit_cmdDesactivar_Click:
Exit Sub
Err_cmdDesactivar_Click:
MsgBox Err.Description
Resume Exit_cmdDesactivar_Click
End Sub
'---------------------------------------------------
Private Sub Form_Load()
Texto0.Enabled = False
Texto1.Enabled = False
Texto2.Enabled = False
Texto0.BackColor = 16777215
Texto1.BackColor = 16777215
Texto2.BackColor = 16777215
End Sub |