[AccessD] Check Box Problem

Rats.  No soap.  Tried it both before and after the call to the delay function, and also as the first statement in the fraYesNo_AfterUpdate() sub.  But no check mark.  Any other thoughts?

Rocky

  ----- Original Message ----- 
  From: Drew Wutka 
  To: 'Access Developers discussion and problem solving' 
  Sent: Tuesday, September 02, 2003 3:28 PM
  Subject: RE: [AccessD] Check Box Problem


  Try a DoEvents statement, so that it allows the screen to refresh before it moves.

  Drew
    -----Original Message-----
    From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com]
    Sent: Tuesday, September 02, 2003 5:15 PM
    To: AccessD at databaseadvisors.com
    Subject: [AccessD] Check Box Problem


    Dear List:

    I have an app that is basically a questionnaire.  Most questions display an option frame with check boxes labeled Yes and No.  After making a selection the focus moves to the 'Next Screen' command button.  

    Then I added an 'Auto Advance' feature where the program automatically advances to the next question after a 1/2 second delay.

    Private Sub fraYesNo_AfterUpdate()
        If fraAutoAdvance = 1 Then
            Call Delay
            Call cmdNextQuestion_Click
        End If
    End Sub

    where delay is:

    Public Sub Delay()

    Dim varstop As Variant

    varstop = Timer + gdblDelay

    Do Until Timer > varstop
    Loop

    End Sub

    When the question is first displayed, both the Yes and the No check boxes have a gray background.  Without the auto advance, the focus moves to the Next Screen button and the check mark dutifully appears in the proper box.  

    The problem is that when the user is using the Auto-Advance feature the clicked check box remains gray, the unclicked check box turns white, and after 1/2 second the next screen appears. So it's a bit confusing to the eye.

    I cannot figure out a way to make the check mark appear in the box.  Anyone see what' I'm doing wrong?

    MTIA and regards,

    Rocky Smolin
    Beach Access Software



------------------------------------------------------------------------------


  _______________________________________________
  AccessD mailing list
  AccessD at databaseadvisors.com
  http://databaseadvisors.com/mailman/listinfo/accessd
  Website: http://www.databaseadvisors.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://databaseadvisors.com/pipermail/accessd/attachments/20030902/ab752c6c/attachment-0001.html>