![Antiguo](http://static.forosdelweb.com/fdwtheme/images/statusicon/post_old.gif)
11/11/2011, 09:29
|
| | Fecha de Ingreso: octubre-2011
Mensajes: 15
Antigüedad: 13 años, 3 meses Puntos: 2 | |
Access Visual basic, 1 click cambio valor Hola por error postee en ACCes la siguiente cuestion
Como hacer que el valor de un textbox cambie con cada click.
Aqui les muestro el codigo, pero no me funciona, en el primer click me pasa a Not available, en el segundo a Available AM, pero ahi se queda, no continua el bucle....
(El primer valor del textbox es 1 (COn 2 espacios delante....))
A partir de ah'i quiero que con cada click cambie su valor a :
1) Not available
2)Available AM (Que es donde se me queda parado sin hacer nada)
3)Available PM
4)Available
5) Vuelta a comenzar....
If Forms!frmCalendar!txtDayBlock01.Value Like " 1*" Then
Forms!frmCalendar!txtDayBlock01.Value = "Not Available"
Me.ActiveControl.BackColor = 16777165
ElseIf Forms!frmCalendar!txtDayBlock01.Value Like "[Not Available]*" Then
Forms!frmCalendar!txtDayBlock01.Value = "AM"
ElseIf Forms!frmCalendar!txtDayBlock01.Value Like "AM*" Then
Forms!frmCalendar!txtDayBlock01.Value = "PM"
ElseIf Forms!frmCalendar!txtDayBlock01.Value Like "[Available PM]*" Then
Forms!frmCalendar!txtDayBlock01.Value = "Available"
ElseIf Forms!frmCalendar!txtDayBlock01.Value Like "[Available]*" Then
Forms!frmCalendar!txtDayBlock01.Value = "Not Available"
End If |