Ver Mensaje Individual
  #2 (permalink)  
Antiguo 03/02/2004, 15:42
Mmc
 
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