Problema de codigo
Publicado por Sandra (12 intervenciones) el 12/02/2019 22:24:38
Tengo el siguiente código para dos formularios, el problema es que en uno no se bloquean los campos que se deben bloquear y en el otro no se cambia la fecha termino al poner "completada" en el campo "estado", espero me puedan ayudar a solucionar este problema, de antemano gracias por su tiempo.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Private Sub Estado_AfterUpdate()
If Me.Estado = "Completada" Then
Me.[Termino] = Date
Else
IsNull (Me.[Termino])
End If
End Sub
Private Sub Form_Current()
Me.[Inicio] = Me.FechaReporte + 14
If Me.[Finalización] > 0 Then
Me.[Finalización] = [Finalización]
Else
Me.[Finalización] = [Fecha de inicio] + 2
End If
End Sub
Private Sub Form_Load()
Me.Equipo.Enabled = False
Me.[Observaciones Karen].Enabled = False
Me.[Tipo de servicio].Enabled = False
Me.[No de serie].Enabled = False
Me.FechaReporte.Enabled = False
Me.institución.Enabled = False
Me.Hospital.Enabled = False
End Sub
Valora esta pregunta
0