![]() | |
![]() |
| | Thread Tools | Display Modes |
#1
| |||
| |||
|
#2
| |||
| |||
|
|
Since access 97 we have used this and it worked perfectly well to reset something on an option group double click =[settodeault] Public Function SetToDefault() As Boolean ' Called from the double click event to set the value to the form default value Dim ctl As Control Set ctl = Screen.ActiveControl ctl = ctl.DefaultValue ctl.Requery End Function in 2007 the =[settodeault] the option does not contain automation object settodefault is the only way I can change this is to go thru every old database and change it to expression and then in the expression do a call settodefault |
#3
| |||
| |||
|
|
sparks wrote: Since access 97 we have used this and it worked perfectly well to reset something on an option group double click =[settodeault] Public Function SetToDefault() As Boolean ' Called from the double click event to set the value to the form default value Dim ctl As Control Set ctl = Screen.ActiveControl ctl = ctl.DefaultValue ctl.Requery End Function in 2007 the =[settodeault] the option does not contain automation object settodefault is the only way I can change this is to go thru every old database and change it to expression and then in the expression do a call settodefault I have never seen that syntax in an event property. According to VBA Help on "Event Properties", it should be: =SetToDefault() |
![]() |
| Thread Tools | |
| Display Modes | |
| |