Rocky Smolin - Beach Access Software
bchacc at san.rr.com
Mon Apr 18 15:30:08 CDT 2005
"open the other form using automation and sink its Close event on the calling form" Como? Rocky ----- Original Message ----- From: "Charlotte Foust" <cfoust at infostatsystems.com> To: "Access Developers discussion and problem solving" <accessd at databaseadvisors.com> Sent: Monday, April 18, 2005 1:07 PM Subject: RE: [AccessD] On Click Event in Command button versus Label; > So is that the routine behind a button or a label? I have to say that I > wouldn't do it the way you appear to be attempting with either. You > don't need a DoEvents loop if you open the other form using automation > and sink its Close event on the calling form. DoEvents is sometimes > necessary, but I avoid it whenever possible, since it also can cause > hangups. Simply put any code to be run after the other form closes in > the event sink on the calling form. > > Charlotte Foust > > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Monday, April 18, 2005 9:10 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] On Click Event in Command button versus Label; > > > Charlotte: > > It's just: Private Sub cmdContinue_Click() > > in that procedure there's a call to: > > ' get next question > strNext = GetNextQuestion > > and those lines of code appear in the GetNextQuestion function. > > Normally GetNextQuestion returns the next question in the assessment, > but > there are several charts in the assessment - dieases, sleeping pills, > medications, relaxations techniques, activities in bed, etc. - which > contain > a bunch of check boxes. > > When they are loaded, instead of closing the main assessment form, I > just > make it invisible and use that SysCmd function to know when the chart > form > closes. > > Do you think using the IsLoaded property of the AllForms collection > might > make a difference? Shouldn't but who knows. After all, it's Access. > > TIA > > Rocky > > > > ----- Original Message ----- > From: "Charlotte Foust" <cfoust at infostatsystems.com> > To: "Access Developers discussion and problem solving" > <accessd at databaseadvisors.com> > Sent: Monday, April 18, 2005 8:42 AM > Subject: RE: [AccessD] On Click Event in Command button versus Label; > > >> I've never found that to be true, Rocky, and I have used labels as >> light weight "buttons" in several recent versions of Access. What >> does the declaration for the procedure look like? >> >> Charlotte Foust >> >> >> -----Original Message----- >> From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] >> Sent: Sunday, April 17, 2005 9:36 PM >> To: AccessD at databaseadvisors.com >> Subject: [AccessD] On Click Event in Command button versus Label; >> >> >> Dear List: >> >> Is there a difference in how the On Click event works for a command >> button versus a label in Access 2003. >> >> I had a form that was working with command buttons. But the gray >> command buttons are ugly. So I substituted a label and put the code >> from the command button behind the label. >> >> When you click this button (or label) it opens another form, makes the > >> calling for invisible until the called form closes: >> >> DoCmd.OpenForm "frmActivitiesInBed" >> Me.Visible = False >> Do While SysCmd(acSysCmdGetObjectState, acForm, >> "frmActivitiesInBed") <> 0 >> DoEvents >> Loop >> >> This works real well when in a command button On Click but when it's >> called in a label's On Click, the system totally hangs with 100% CPU >> usage. >> >> Another curious symptom: If I alt-Tab away from the app window while >> it's froze, and back again, it unfreezes the app. >> >> Does this sound familiar to anybody? >> >> MTIA, >> >> Rocky Smolin >> Beach Access Software >> http://www.e-z-mrp.com >> 858-259-4334 >> -- >> 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 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com >