Heenan, Lambert
Lambert.Heenan at chartisinsurance.com
Thu Dec 30 12:33:43 CST 2010
What about Me.Recalc as the last line in the Sub ComputePay (assuming that sub is local to the form)? Also, have you put a Debug.Print statement inside the AfterUpdate event handler to be sure it is being called? Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin Sent: Thursday, December 30, 2010 1:16 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Text Boxes displaying in 2003 and not in 2007 David: The first three text boxes, where the problem lies, are bound (=Sum([fieldname]). I put DoEvents into the AftertUpdate event of the text box but didn't help. Also tried DoEvents in the Form_Update event - no soap. Rocky -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David McAfee Sent: Thursday, December 30, 2010 9:56 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Text Boxes displaying in 2003 and not in 2007 I've been seeing weird repaint/refresh problems too in A2K7. Can you try using a DoEvents after each field is updated? On Thu, Dec 30, 2010 at 9:21 AM, Rocky Smolin <rockysmolin at bchacc.com>wrote: > Dear List: > > I have an app which I developed and delivered to the client in A2K3. > He runs is mostly in A2K7. This is a legal app which, among other > things tracks time spent. The problem is on the Timesheet form where > the lawyer enters time by client and matter. > > In the Timesheet Form Header section there are four text boxes: > > txtHoursWorked - control source is =Sum([HoursWorked]) > txtHoursBillable - control source is =Sum([HoursBillable]) > txtAmountBilled - control source is =Sum([AmountBilled]) > txtAmountToPay which is unbound and is update by a call to a module > ComputePay > > The first three change after an update of one of those three fields in > a detail section. Whenever a field which affects one of these fields > is updated, I call ComputePay and this updates the unbound text box > txtAmountToPay. > > This works perfectly in 2003. In 2007, however, after an update the > values in the first three boxes disappear and the fourth one doesn't > change. But they're actually there. If I alt-Tab away from the form > and then alt-Tab back, the numbers appear. > > I have tried Me.Repaint and Me.Refresh in the ComputePay routine but > no soap. > > I confirmed that this happens on my test bed machine as well as on his box. > Both are running SP2. > > Any ideas what might be causing this? > > MTIA > > > Rocky Smolin > > Beach Access Software > > 858-259-4334 > > Skype: rocky.smolin > > www.e-z-mrp.com <http://www.e-z-mrp.com/> > > www.bchacc.com <http://www.bchacc.com/> > > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com