13/06/2008, 04:14
|
 | | | Fecha de Ingreso: febrero-2008
Mensajes: 397
Antigüedad: 16 años, 9 meses Puntos: 1 | |
| Respuesta: Desactivar botones
Al final lo he conseguido de esta manera:
Private Sub Comando137_Click()
If Me.TxtHoraFinal <> 0 Then
Else
If Me.tarde = True Then
MsgBox "Ya has seleccionado un turno"
Else
If Me.noche = True Then
MsgBox "Ya has seleccionado un turno"
Else
If Me.festivo = True Then
MsgBox "Ya has seleccionado un turno"
Else
Me.mañana = Not Nz(Me.mañana, False)
End If
End If
End If
End If
End Sub |